+++ /dev/null
-// --- ROOT system
-#include <TFile.h>
-#include <TClonesArray.h>
-#include <TList.h>
-#include <TObjString.h>
-#include <TTimeStamp.h>
-
-#include "AliZDCPreprocessor.h"
-#include "AliCDBManager.h"
-#include "AliCDBEntry.h"
-#include "AliCDBMetaData.h"
-#include "AliDCSValue.h"
-#include "AliAlignObj.h"
-#include "AliAlignObjParams.h"
-#include "AliLog.h"
-#include "AliZDCDataDCS.h"
-#include "AliZDCChMap.h"
-#include "AliZDCPedestals.h"
-#include "AliZDCLaserCalib.h"
-#include "AliZDCEnCalib.h"
-#include "AliZDCTowerCalib.h"
-#include "AliZDCMBCalib.h"
-#include "AliZDCTDCCalib.h"
-
-/////////////////////////////////////////////////////////////////////
-// //
-// Class implementing Shuttle ZDC pre-processor. //
-// It takes data from DCS and DAQ and writes calibration objects //
-// in the OCDB and reference values/histos in the ReferenceData. //
-// //
-/////////////////////////////////////////////////////////////////////
-
-// ******************************************************************
-// RETURN CODES:
-// return 0 : everything OK
-// return 1 : no DCS input data Map
-// return 2 : error storing DCS data in RefData
-// return 3 : error storing alignment object in OCDB
-// return 4 : error in ZDCMapping.dat file retrieved from DAQ FXS (not existing|empty|corrupted)
-// return 5 : error storing mapping obj. in OCDB
-// return 6 : error storing energy calibration obj. in OCDB
-// return 7 : error storing tower inter-calibration obj. in OCDB
-// return 8 : error in ZDCEnergyCalib.dat file retrieved from DAQ FXS
-// return 9 : error in ZDCTowerCalib.dat file retrieved from DAQ FXS
-// return 10: error in ZDCPedestal.dat file retrieved from DAQ FXS
-// return 11: error storing pedestal calibration obj. in OCDB
-// return 12: error in ZDCPedHisto.root file retrieved from DAQ FXS
-// return 13: error storing pedestal histos in RefData
-// return 14: error in ZDCLaserCalib.dat file retrieved from DAQ FXS
-// return 15: error storing laser calibration obj. in OCDB
-// return 16: error in ZDCLaserHisto.root file retrieved from DAQ FXS
-// return 17: error storing laser histos in RefData
-// return 18: error in ZDCMBCalib.root file retrieved from DAQ FXS
-// return 19: error storing MB calibration obj. in OCDB
-// return 20: error in ZDCTDCCalib.root file retrieved from DAQ FXS
-// return 21: error in storing TDC calibration obj. in OCDB
-// return 22: error in ZDCTDCHisto.root file retrieved from DAQ FXS
-// Return 23: error storing TDC reference histos in RefData
-// ******************************************************************
-
-ClassImp(AliZDCPreprocessor)
-
-//______________________________________________________________________________________________
-AliZDCPreprocessor::AliZDCPreprocessor(AliShuttleInterface* shuttle) :
- AliPreprocessor("ZDC", shuttle),
- fData(0)
-{
- // constructor
- // May 2009 - run types updated according to
- // http://alice-ecs.web.cern.ch/alice-ecs/runtypes_3.36.html
- AddRunType("STANDALONE_PEDESTAL");
- AddRunType("STANDALONE_LASER");
- AddRunType("STANDALONE_COSMIC");
- AddRunType("CALIBRATION_EMD");
- AddRunType("CALIBRATION_MB");
- AddRunType("CALIBRATION_CENTRAL");
- AddRunType("CALIBRATION_SEMICENTRAL");
- AddRunType("CALIBRATION_BC");
- AddRunType("PHYSICS");
-}
-
-
-//______________________________________________________________________________________________
-AliZDCPreprocessor::~AliZDCPreprocessor()
-{
- // destructor
-}
-
-
-//______________________________________________________________________________________________
-void AliZDCPreprocessor::Initialize(Int_t run, UInt_t startTime, UInt_t endTime)
-{
- // Creates AliZDCDataDCS object
-
- AliPreprocessor::Initialize(run, startTime, endTime);
-
- AliDebug(2,Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s \n\tStartTime DCS Query %s \n\tEndTime DCS Query %s", run,
- TTimeStamp(startTime).AsString(),
- TTimeStamp(endTime).AsString(), ((TTimeStamp)GetStartTimeDCSQuery()).AsString(), ((TTimeStamp)GetEndTimeDCSQuery()).AsString()));
-
- fRun = run;
- fStartTime = startTime;
- fEndTime = endTime;
-
- fData = new AliZDCDataDCS(fRun, fStartTime, fEndTime, GetStartTimeDCSQuery(), GetEndTimeDCSQuery());
-}
-
-//_____________________________________________________________________________
-Bool_t AliZDCPreprocessor::ProcessDCS(){
-
- // tells whether DCS should be processed or not
-
- TString runType = GetRunType();
- Log(Form("RunType %s",runType.Data()));
-
- if (runType=="STANDALONE_COSMIC" || runType=="STANDALONE_PEDESTAL"){
- return kFALSE;
- }
-
- return kTRUE;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessDCSData(TMap* dcsAliasMap)
-{
-
- // Fills data into a AliZDCDataDCS object
- if(!dcsAliasMap){
- Log(" No DCS map found: ZDC exiting from Shuttle");
- if(fData){
- delete fData;
- fData = 0;
- }
- return 1;
- }
-
- Log(Form("Processing data from DCS"));
-
- // The processing of the DCS input data is forwarded to AliZDCDataDCS
- //dcsAliasMap->Print("");
- Bool_t resDCSProcess = fData->ProcessData(*dcsAliasMap);
- if(resDCSProcess==kFALSE){
- Log(" Problems in processing DCS DP");
- return 1;
- }
-
- // ------------------------------------------------------
- // Change introduced 26/9/09 in order NOT to process the
- // HV DP since some of them are never found in amanda DB
- // ------------------------------------------------------
- // Store DCS data as reference
- AliCDBMetaData metadata;
- metadata.SetResponsible("Chiara Oppedisano");
- metadata.SetComment("DCS DP TMap for ZDC");
- Bool_t resDCSRef = kTRUE;
- resDCSRef = StoreReferenceData("DCS","Data", dcsAliasMap, &metadata);
-
- if(resDCSRef==kFALSE) return 2;
-
- // --- Writing ZDC table positions into alignment object
- TClonesArray *array = new TClonesArray("AliAlignObjParams",10);
- TClonesArray &alobj = *array;
- AliAlignObjParams a;
- Double_t dx=0., dz=0., dpsi=0., dtheta=0., dphi=0.;
- // Vertical table position in mm from DCS
- Double_t dyZN1 = (Double_t) (fData->GetAlignData(0)/10.);
- Double_t dyZP1 = (Double_t) (fData->GetAlignData(1)/10.);
- Double_t dyZN2 = (Double_t) (fData->GetAlignData(2)/10.);
- Double_t dyZP2 = (Double_t) (fData->GetAlignData(3)/10.);
- //
- const char *n1ZDC="ZDC/NeutronZDC_C";
- const char *p1ZDC="ZDC/ProtonZDC_C";
- const char *n2ZDC="ZDC/NeutronZDC_A";
- const char *p2ZDC="ZDC/ProtonZDC_A";
- //
- UShort_t iIndex=0;
- AliGeomManager::ELayerID iLayer = AliGeomManager::kInvalidLayer;
- UShort_t volid = AliGeomManager::LayerToVolUID(iLayer,iIndex);
- //
- new(alobj[0]) AliAlignObjParams(n1ZDC, volid, dx, dyZN1, dz, dpsi, dtheta, dphi, kTRUE);
- new(alobj[1]) AliAlignObjParams(p1ZDC, volid, dx, dyZP1, dz, dpsi, dtheta, dphi, kTRUE);
- new(alobj[2]) AliAlignObjParams(n2ZDC, volid, dx, dyZN2, dz, dpsi, dtheta, dphi, kTRUE);
- new(alobj[3]) AliAlignObjParams(p2ZDC, volid, dx, dyZP2, dz, dpsi, dtheta, dphi, kTRUE);
-
- // save in CDB storage
- AliCDBMetaData mdDCS;
- mdDCS.SetResponsible("Chiara Oppedisano");
- mdDCS.SetComment("Alignment object for ZDC");
- Bool_t resultAl = Store("Align","Data", array, &mdDCS, 0, kFALSE);
- if(resultAl==kFALSE) return 3;
-
- return 0;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessChMap()
-{
- const int kNModules=10, kNch=48, kNScch=32, kNtdcch=32;
-
- // Reading the file for mapping from FXS
- TList* daqSource = GetFileSources(kDAQ, "MAPPING");
- if(!daqSource){
- AliError(Form("No sources for file ZDCChMapping.dat in run %d ", fRun));
- return 4;
- }
- if(daqSource->GetEntries()==0) return 4;
- Log("\t List of DAQ sources for MAPPING id: "); daqSource->Print();
- //
- TIter iter(daqSource);
- TObjString* source = 0;
- Int_t isou = 0;
- Int_t modMap[kNModules][3], adcMap[kNch][6], scMap[kNScch][6], tdcMap[kNtdcch][4];
- //
- while((source = dynamic_cast<TObjString*> (iter.Next()))){
- TString fileName = GetFile(kDAQ, "MAPPING", source->GetName());
- Log(Form("\t Getting file #%d: ZDCChMapping.dat from %s\n",++isou, source->GetName()));
-
- if(fileName.Length() <= 0){
- Log(Form("No file from source %s!", source->GetName()));
- return 4;
- }
- // --- Reading file with calibration data
- //const char* fname = fileName.Data();
- if(fileName){
- FILE *file;
- if((file = fopen(fileName,"r")) == NULL){
- printf("Cannot open file %s \n",fileName.Data());
- return 4;
- }
- Log(Form("File %s connected to process data for ADC mapping", fileName.Data()));
- //
- for(Int_t j=0; j<kNch; j++){
- for(Int_t k=0; k<6; k++){
- int read = fscanf(file,"%d",&adcMap[j][k]);
- if(read == 0) AliDebug(3," Failing in reading data from mapping file");
- }
- }
- for(Int_t j=kNch; j<kNch+kNScch; j++){
- for(Int_t k=0; k<6; k++){
- int read = fscanf(file,"%d",&scMap[j-kNch][k]);
- if(read == 0) AliDebug(3," Failing in reading data from mapping file");
- }
- }
- for(Int_t j=kNch+kNScch; j<kNch+kNScch+kNtdcch; j++){
- for(Int_t k=0; k<4; k++){
- int read = fscanf(file,"%d",&tdcMap[j-kNch-kNScch][k]);
- if(read == 0) AliDebug(3," Failing in reading data from mapping file");
- }
- }
- for(Int_t j=kNch+kNScch+kNtdcch; j<kNch+kNScch+kNtdcch+kNModules; j++){
- for(Int_t k=0; k<3; k++){
- int read = fscanf(file,"%d",&modMap[j-kNch-kNScch-kNtdcch][k]);
- if(read == 0) AliDebug(3," Failing in reading data from mapping file");
- }
- }
- fclose(file);
- }
- else{
- Log(Form("File %s not found", fileName.Data()));
- return 4;
- }
- }
-
- // Store the currently read map ONLY IF it is different
- // from the entry in the OCDB
- Bool_t adcMapUpdated=kFALSE, scMapUpdated=kFALSE, tdcMapUpdated=kFALSE;
- Bool_t updateOCDB = kFALSE;
-
- AliCDBEntry *cdbEntry = GetFromOCDB("Calib","ChMap");
- if(!cdbEntry){
- Log(" No existing CDB entry for ADC mapping");
- updateOCDB = kTRUE;
- }
- else{
- AliZDCChMap *chMap = (AliZDCChMap*) cdbEntry->GetObject();
- for(Int_t i=0; i<kNch; i++){
- if( (adcMap[i][1] != chMap->GetADCModule(i))
- || (adcMap[i][2] != chMap->GetADCChannel(i))
- || (adcMap[i][3] != chMap->GetADCSignalCode(i))
- || (adcMap[i][4] != chMap->GetDetector(i))
- || (adcMap[i][5] != chMap->GetSector(i)))
- adcMapUpdated = kTRUE;
- }
- for(Int_t i=0; i<kNScch; i++){
- if( (scMap[i][2] != chMap->GetScChannel(i))
- || (scMap[i][3] != chMap->GetScSignalCode(i)) )
- scMapUpdated = kTRUE;
- }
- for(Int_t i=0; i<kNtdcch; i++){
- if( (tdcMap[i][2] != chMap->GetTDCChannel(i))
- || (tdcMap[i][3] != chMap->GetTDCSignalCode(i)))
- tdcMapUpdated = kTRUE;
- }
- }
- if(adcMapUpdated || scMapUpdated || tdcMapUpdated) updateOCDB = kTRUE;
- //
- Bool_t resChMapStore = kTRUE;
- if(updateOCDB==kTRUE){
- Log(" A new entry ZDC/Calib/ChMap will be created");
- //
- // --- Initializing mapping calibration object
- AliZDCChMap *mapCalib = new AliZDCChMap("ZDC");
- // Writing channel map in the OCDB
- for(Int_t k=0; k<kNModules; k++){
- mapCalib->SetModuleMap(k, modMap[k][0], modMap[k][1], modMap[k][2]);
- }
- for(Int_t k=0; k<kNch; k++){
- mapCalib->SetADCModule(k,adcMap[k][1]);
- mapCalib->SetADCChannel(k,adcMap[k][2]);
- mapCalib->SetADCSignalCode(k,adcMap[k][3]);
- mapCalib->SetDetector(k,adcMap[k][4]);
- mapCalib->SetSector(k,adcMap[k][5]);
- }
- for(Int_t k=0; k<kNScch; k++){
- mapCalib->SetScChannel(k, scMap[k][2]);
- mapCalib->SetScSignalCode(k, scMap[k][3]);
- mapCalib->SetScDetector(k, scMap[k][4]);
- mapCalib->SetScSector(k, scMap[k][5]);
- }
- for(Int_t k=0; k<kNtdcch; k++){
- mapCalib->SetTDCChannel(k, tdcMap[k][2]);
- mapCalib->SetTDCSignalCode(k, tdcMap[k][3]);
- }
- //
- //mapCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("AliZDCChMap object created by ZDC preprocessor");
- //
- resChMapStore = Store("Calib","ChMap",mapCalib, &metaData, 0, kTRUE);
- printf(" Mapping object stored in OCDB\n");
- }
- else{
- Log(" ZDC/Calib/ChMap entry in OCDB is valid and won't be updated");
- resChMapStore = kTRUE;
- }
- delete daqSource; daqSource=0;
-
- TString runType = GetRunType();
- if(runType.CompareTo("PHYSICS")==0){
- Log(Form("RunType %s -> producing TDC calibration data",runType.Data()));
-
- // Reading the file for mapping from FXS
- TList* daqSourcetdc = GetFileSources(kDAQ, "TDCDATA");
- if(!daqSourcetdc){
- AliError(Form("No sources for file ZDCChMappingTDCCalib.dat in run %d ", fRun));
- return 20;
- }
- if(daqSourcetdc->GetEntries()==0) return 20;
- Log("\t List of DAQ sources for TDCDATA id: "); daqSourcetdc->Print();
- //
- Bool_t resTDCcal = kTRUE;
- TIter itertdc(daqSourcetdc);
- TObjString* sourcetdc = 0;
- Int_t isoutdc = 0;
- //
- while((sourcetdc = dynamic_cast<TObjString*> (itertdc.Next()))){
- TString fileNametdc = GetFile(kDAQ, "TDCDATA", sourcetdc->GetName());
- Log(Form("\t Getting file #%d: ZDCTDCdata.dat from %s\n",++isoutdc, sourcetdc->GetName()));
-
- if(fileNametdc.Length() <= 0){
- Log(Form("No file from source %s!", sourcetdc->GetName()));
- return 20;
- }
- // --- Initializing TDC calibration object
- AliZDCTDCCalib *tdcCalib = new AliZDCTDCCalib("ZDC");
- // --- Reading file with calibration data
- //const char* fname = fileName.Data();
- if(fileNametdc){
- FILE *filetdc;
- if((filetdc = fopen(fileNametdc,"r")) == NULL){
- printf("Cannot open file %s \n",fileNametdc.Data());
- return 20;
- }
- Log(Form("File %s connected to process TDC data", fileNametdc.Data()));
- //
- Float_t tdcMean[6][2];
- for(Int_t it=0; it<6; it++){
- for(Int_t iu=0; iu<2; iu++) tdcMean[it][iu]=0.;
- }
- for(Int_t k=0; k<6; k++){
- for(Int_t j=0; j<2; j++){
- int leggi = fscanf(filetdc,"%f",&tdcMean[k][j]);
- if(leggi==0) AliDebug(3," Failing reading data from tdc file");
- tdcCalib->SetMeanTDC(k, tdcMean[k][0]);
- tdcCalib->SetWidthTDC(k, tdcMean[k][1]);
- }
- }
- fclose(filetdc);
- }
- else{
- Log(Form("File %s not found", fileNametdc.Data()));
- return 20;
- }
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCTDCCalib object");
- //
- resTDCcal = Store("Calib","TDCCalib",tdcCalib, &metaData, 0, kTRUE);
- if(resTDCcal==kFALSE) return 21;
- }
- delete daqSourcetdc; daqSourcetdc = 0;
-
- Bool_t restdcHist = kTRUE;
- TList* daqSourceH = GetFileSources(kDAQ, "TDCHISTOS");
- if(!daqSourceH){
- Log(Form("No source for TDCHISTOS id run %d !", fRun));
- return 22;
- }
- Log("\t List of DAQ sources for TDCHISTOS id: "); daqSourceH->Print();
- //
- TIter iterH(daqSourceH);
- TObjString* sourceH = 0;
- Int_t iH=0;
- while((sourceH = dynamic_cast<TObjString*> (iterH.Next()))){
- TString stringTDCFileName = GetFile(kDAQ, "TDCHISTOS", sourceH->GetName());
- if(stringTDCFileName.Length() <= 0){
- Log(Form("No TDCHISTOS file from source %s!", sourceH->GetName()));
- return 22;
- }
- const char* tdcFileName = stringTDCFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++iH, tdcFileName, sourceH->GetName()));
- restdcHist = StoreReferenceFile(tdcFileName, "tdcReference.root");
- if(restdcHist==kFALSE) return 23;
- }
- delete daqSourceH; daqSourceH=0;
- }
-
- if(resChMapStore==kFALSE) return 5;
- else return 0;
-
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessppData()
-{
- Bool_t resEnCal=kTRUE, resTowCal=kTRUE;
-
- // *********** Energy calibration
- // --- Cheking if there is already the entry in the OCDB
- AliCDBEntry *cdbEnEntry = GetFromOCDB("Calib", "EnergyCalib");
- if(!cdbEnEntry){
- Log(Form(" ZDC/Calib/EnergyCalib entry will be created"));
- // --- Initializing calibration object
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- //
- AliZDCEnCalib *eCalib = new AliZDCEnCalib("ZDC");
- for(Int_t j=0; j<6; j++) eCalib->SetEnCalib(j,1.);
- metaData.SetComment("AliZDCEnCalib object");
- //eCalib->Print("");
- resEnCal = Store("Calib", "EnergyCalib", eCalib, &metaData, 0, kTRUE);
- }
- else{
- // if entry exists it is still valid (=1 for all runs!)
- Log(Form(" Valid ZDC/Calib/EnergyCalib object already existing in OCDB!!!"));
- resEnCal = kTRUE;
- }
-
- if(resEnCal==kFALSE) return 6;
-
- //
- // *********** Tower inter-calibration
- // --- Cheking if there is already the entry in the OCDB
- AliCDBEntry *cdbTowEntry = GetFromOCDB("Calib", "TowerCalib");
- if(!cdbTowEntry){
- AliZDCTowerCalib *towCalib = new AliZDCTowerCalib("ZDC");
- for(Int_t j=0; j<5; j++){
- towCalib->SetZN1EqualCoeff(j, 1.);
- towCalib->SetZP1EqualCoeff(j, 1.);
- towCalib->SetZN2EqualCoeff(j, 1.);
- towCalib->SetZP2EqualCoeff(j, 1.);
- }
- //towCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("AliZDCTowerCalib object");
- //
- resTowCal = Store("Calib", "TowerCalib", towCalib, &metaData, 0, kTRUE);
- }
- else{
- // if entry exists it is still valid (=1 for all runs!)
- Log(Form(" Valid ZDC/Calib/TowerCalib object already existing in OCDB!!!"));
- resTowCal = kTRUE;
- }
-
- if(resTowCal==kFALSE) return 7;
-
- return 0;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessCalibData(Float_t beamEnergy)
-{
- TList* daqSources = GetFileSources(kDAQ, "EMDENERGYCALIB");
- if(!daqSources){
- AliError(Form("No sources for CALIBRATION_EMD run %d !", fRun));
- return 8;
- }
- Log("\t List of DAQ sources for EMDENERGYCALIB id: "); daqSources->Print();
- //
- TIter iter2(daqSources);
- TObjString* source = 0;
- Int_t i=0;
- Bool_t resEnCal=kTRUE, resTowCal=kTRUE;
-
- while((source = dynamic_cast<TObjString*> (iter2.Next()))){
- TString stringEMDFileName = GetFile(kDAQ, "EMDENERGYCALIB", source->GetName());
- if(stringEMDFileName.Length() <= 0){
- Log(Form("No file from source %s!", source->GetName()));
- return 8;
- }
- const char* emdFileName = stringEMDFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++i,emdFileName,source->GetName()));
- //
- // --- Initializing energy calibration object
- AliZDCEnCalib *eCalib = new AliZDCEnCalib("ZDC");
- // --- Reading file with calibration data
- if(emdFileName){
- FILE *file;
- if((file = fopen(emdFileName,"r")) == NULL){
- printf("Cannot open file %s \n",emdFileName);
- return 8;
- }
- Log(Form("File %s connected to process data from EM dissociation events", emdFileName));
- //
- Float_t fitValEMD[6];
- for(Int_t j=0; j<6; j++){
- if(j<6){
- int iread = fscanf(file,"%f",&fitValEMD[j]);
- if(iread==0) AliDebug(3," Failing reading data from EMD calibration data file");
- if(fitValEMD[j]!=1.) eCalib->SetEnCalib(j, beamEnergy/fitValEMD[j]);
- else eCalib->SetEnCalib(j, fitValEMD[j]);
- }
- }
- //
- fclose(file);
- }
- else{
- Log(Form("File %s not found", emdFileName));
- return 8;
- }
- //eCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCEnCalib object");
- //
- resEnCal = Store("Calib","EnergyCalib",eCalib, &metaData, 0, kTRUE);
- if(resEnCal==kFALSE) return 6;
- }
- delete daqSources; daqSources = 0;
-
- TList* daqSourcesH = GetFileSources(kDAQ, "EMDTOWERCALIB");
- if(!daqSourcesH){
- AliError(Form("No sources for CALIBRATION_EMD run %d !", fRun));
- return 9;
- }
- Log("\t List of DAQ sources for EMDTOWERCALIB id: "); daqSourcesH->Print();
- //
- TIter iter2H(daqSourcesH);
- TObjString* sourceH = 0;
- Int_t iH=0;
- while((sourceH = dynamic_cast<TObjString*> (iter2H.Next()))){
- TString stringtowEMDFileName = GetFile(kDAQ, "EMDTOWERCALIB", sourceH->GetName());
- if(stringtowEMDFileName.Length() <= 0){
- Log(Form("No file from source %s!", sourceH->GetName()));
- return 9;
- }
- const char * towEMDFileName = stringtowEMDFileName.Data();
- Log(Form("\t Getting file #%d: %s from source %s\n",++iH,towEMDFileName,sourceH->GetName()));
- // --- Initializing energy calibration object
- AliZDCTowerCalib *towCalib = new AliZDCTowerCalib("ZDC");
- // --- Reading file with calibration data
- if(towEMDFileName){
- FILE *file;
- if((file = fopen(towEMDFileName,"r")) == NULL){
- printf("Cannot open file %s \n",towEMDFileName);
- return 9;
- }
- //
- Float_t equalCoeff[4][5];
- for(Int_t j=0; j<4; j++){
- for(Int_t k=0; k<5; k++){
- int leggi = fscanf(file,"%f",&equalCoeff[j][k]);
- if(leggi==0) AliDebug(3," Failing reading data from EMD calibration file");
- if(j==0) towCalib->SetZN1EqualCoeff(k, equalCoeff[j][k]);
- else if(j==1) towCalib->SetZP1EqualCoeff(k, equalCoeff[j][k]);
- else if(j==2) towCalib->SetZN2EqualCoeff(k, equalCoeff[j][k]);
- else if(j==3) towCalib->SetZP2EqualCoeff(k, equalCoeff[j][k]);
- }
- }
- //
- fclose(file);
- }
- else{
- Log(Form("File %s not found", towEMDFileName));
- return 9;
- }
- //towCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCTowerCalib object");
- //
- resTowCal = Store("Calib","TowerCalib",towCalib, &metaData, 0, kTRUE);
- if(resTowCal==kFALSE) return 7;
- }
- delete daqSourcesH; daqSourcesH = 0;
-
-
- return 0;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessPedestalData()
-{
- TList* daqSources = GetFileSources(kDAQ, "PEDESTALDATA");
- if(!daqSources){
- Log(Form("No source for STANDALONE_PEDESTAL run %d !", fRun));
- return 10;
- }
- if(daqSources->GetEntries()==0) return 10;
- Log("\t List of DAQ sources for PEDESTALDATA id: "); daqSources->Print();
- //
- TIter iter(daqSources);
- TObjString* source;
- Int_t i=0;
- Bool_t resPedCal=kTRUE, resPedHist=kTRUE;
-
- while((source = dynamic_cast<TObjString*> (iter.Next()))){
- TString stringPedFileName = GetFile(kDAQ, "PEDESTALDATA", source->GetName());
- if(stringPedFileName.Length() <= 0){
- Log(Form("No PEDESTALDATA file from source %s!", source->GetName()));
- return 10;
- }
- const char* pedFileName = stringPedFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++i,pedFileName,source->GetName()));
- //
- // --- Initializing pedestal calibration object
- AliZDCPedestals *pedCalib = new AliZDCPedestals("ZDC");
- // --- Reading file with pedestal calibration data
- // no. ADCch = (22 signal ch. + 2 reference PMs) * 2 gain chain = 48
- const Int_t knZDCch = 48;
- FILE *file;
- if((file = fopen(pedFileName,"r")) == NULL){
- printf("Cannot open file %s \n",pedFileName);
- return 10;
- }
- Log(Form("File %s connected to process pedestal data", pedFileName));
- Float_t pedVal[(3*knZDCch)][2];
- for(Int_t k=0; k<(3*knZDCch); k++){
- for(Int_t j=0; j<2; j++){
- int aleggi = fscanf(file,"%f",&pedVal[k][j]);
- if(aleggi==0) AliDebug(3," Failing reading data from pedestal file");
- //if(j==1) printf("pedVal[%d] -> %f, %f \n",k,pedVal[k][0],pedVal[k][1]);
- }
- if(k<knZDCch){
- pedCalib->SetMeanPed(k,pedVal[k][0]);
- pedCalib->SetMeanPedWidth(k,pedVal[k][1]);
- }
- else if(k>=knZDCch && k<(2*knZDCch)){
- pedCalib->SetOOTPed(k-knZDCch,pedVal[k][0]);
- pedCalib->SetOOTPedWidth(k-knZDCch,pedVal[k][1]);
- }
- else if(k>=(2*knZDCch) && k<(3*knZDCch)){
- pedCalib->SetPedCorrCoeff(k-(2*knZDCch),pedVal[k][0],pedVal[k][1]);
- }
- }
- fclose(file);
- //pedCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCPedestals object");
- //
- resPedCal = Store("Calib","Pedestals",pedCalib, &metaData, 0, kTRUE);
- if(resPedCal==kFALSE) return 11;
- }
- delete daqSources; daqSources = 0;
-
- TList* daqSourceH = GetFileSources(kDAQ, "PEDESTALHISTOS");
- if(!daqSourceH){
- Log(Form("No source for PEDESTALHISTOS id run %d !", fRun));
- return 12;
- }
- Log("\t List of DAQ sources for PEDESTALHISTOS id: "); daqSourceH->Print();
- //
- TIter iterH(daqSourceH);
- TObjString* sourceH = 0;
- Int_t iH=0;
- while((sourceH = dynamic_cast<TObjString*> (iterH.Next()))){
- TString stringPedFileName = GetFile(kDAQ, "PEDESTALHISTOS", sourceH->GetName());
- if(stringPedFileName.Length() <= 0){
- Log(Form("No PEDESTALHISTOS file from source %s!", sourceH->GetName()));
- return 12;
- }
- const char* pedFileName = stringPedFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++iH, pedFileName, sourceH->GetName()));
- resPedHist = StoreReferenceFile(pedFileName, "pedestalReference.root");
- if(resPedHist==kFALSE) return 13;
- }
- delete daqSourceH; daqSourceH=0;
-
- return 0;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessLaserData()
-{
- TList* daqSources = GetFileSources(kDAQ, "LASERDATA");
- if(!daqSources){
- AliError(Form("No sources for STANDALONE_LASER run %d !", fRun));
- return 14;
- }
- if(daqSources->GetEntries()==0) return 14;
- Log("\t List of DAQ sources for LASERDATA id: "); daqSources->Print();
- //
- TIter iter2(daqSources);
- TObjString* source = 0;
- Int_t i=0;
- Bool_t resLaserCal=kTRUE, resLaserHist=kTRUE;
-
- while((source = dynamic_cast<TObjString*> (iter2.Next()))){
- TString stringLaserFileName = GetFile(kDAQ, "LASERDATA", source->GetName());
- if(stringLaserFileName.Length() <= 0){
- Log(Form("No LASER file from source %s!", source->GetName()));
- return 14;
- }
- const char* laserFileName = stringLaserFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++i,laserFileName,source->GetName()));
- //
- // --- Initializing pedestal calibration object
- AliZDCLaserCalib *lCalib = new AliZDCLaserCalib("ZDC");
- // --- Reading file with pedestal calibration data
- if(laserFileName){
- FILE *file;
- if((file = fopen(laserFileName,"r")) == NULL){
- printf("Cannot open file %s \n",laserFileName);
- return 14;
- }
- Log(Form("File %s connected to process data from LASER events", laserFileName));
- //
- Float_t ivalRead[22][4];
- for(Int_t j=0; j<22; j++){
- for(Int_t k=0; k<4; k++){
- int aleggi = fscanf(file,"%f",&ivalRead[j][k]);
- if(aleggi==0) AliDebug(3," Failng reading data from laser file");
- //printf(" %d %1.0f ",k, ivalRead[j][k]);
- }
- lCalib->SetDetector(j, (Int_t) ivalRead[j][0]);
- lCalib->SetSector(j, (Int_t) ivalRead[j][1]);
- lCalib->SetfPMValue(j, ivalRead[j][2]);
- lCalib->SetfPMWidth(j, ivalRead[j][3]);
- }
- fclose(file);
- }
- else{
- Log(Form("File %s not found", laserFileName));
- return 14;
- }
- //lCalib->Print("");
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCLaserCalib object");
- //
- resLaserCal = Store("Calib","LaserCalib",lCalib, &metaData, 0, kTRUE);
- if(resLaserCal==kFALSE) return 15;
- }
- delete daqSources; daqSources = 0;
-
- TList* daqSourceH = GetFileSources(kDAQ, "LASERHISTOS");
- if(!daqSourceH){
- AliError(Form("No sources for STANDALONE_LASER run %d !", fRun));
- return 16;
- }
- Log("\t List of DAQ sources for LASERHISTOS id: "); daqSourceH->Print();
- //
- TIter iter2H(daqSourceH);
- TObjString* sourceH = 0;
- Int_t iH=0;
- while((sourceH = dynamic_cast<TObjString*> (iter2H.Next()))){
- Log(Form("\t Getting file #%d\n",++iH));
- TString stringLaserFileName = GetFile(kDAQ, "LASERHISTOS", sourceH->GetName());
- if(stringLaserFileName.Length() <= 0){
- Log(Form("No LASER file from source %s!", sourceH->GetName()));
- return 16;
- }
- resLaserHist = StoreReferenceFile(stringLaserFileName.Data(), "laserReference.root");
- //
- if(resLaserHist==kFALSE) return 17;
- }
- delete daqSourceH; daqSourceH = 0;
-
- return 0;
-}
-
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::ProcessMBCalibData()
-{
- TList* daqSources = GetFileSources(kDAQ, "MBCALIB");
- if(!daqSources){
- AliError(Form("No sources for CALIBRATION_MB run %d !", fRun));
- return 18;
- }
- if(daqSources->GetEntries()==0) return 18;
- Log("\t List of DAQ sources for MBCALIB id: "); daqSources->Print();
- //
- TIter iter2(daqSources);
- TObjString* source = 0;
- Int_t i=0;
- Bool_t resMBCal=kTRUE;
-
- while((source = dynamic_cast<TObjString*> (iter2.Next()))){
- TString stringMBFileName = GetFile(kDAQ, "MBCALIB", source->GetName());
- if(stringMBFileName.Length() <= 0){
- Log(Form("No MBCALIB file from source %s!", source->GetName()));
- return 18;
- }
- const char* mbFileName = stringMBFileName.Data();
- Log(Form("\t Getting file #%d: %s from %s\n",++i,mbFileName,source->GetName()));
- //
- // --- Initializing calibration object
- AliZDCMBCalib *mbCalib = new AliZDCMBCalib("ZDC");
- // --- Reading file with calibration data
- if(mbFileName){
- TFile * fileHistos = TFile::Open(mbFileName);
- Log(Form("File %s connected to process data from CALIBRATION_MB events", mbFileName));
- //
- fileHistos->cd();
- TH2F *hZDCvsZEM = (TH2F*) fileHistos->Get("hZDCvsZEM");
- TH2F *hZDCCvsZEM = (TH2F*) fileHistos->Get("hZDCCvsZEM");
- TH2F *hZDCAvsZEM = (TH2F*) fileHistos->Get("hZDCAvsZEM");
- //
- mbCalib->SetZDCvsZEM(hZDCvsZEM);
- mbCalib->SetZDCCvsZEM(hZDCCvsZEM);
- mbCalib->SetZDCAvsZEM(hZDCAvsZEM);
- //
- //fileHistos->Close();
- }
- else{
- Log(Form("File %s not found", mbFileName));
- return 14;
- }
- //
- AliCDBMetaData metaData;
- metaData.SetBeamPeriod(0);
- metaData.SetResponsible("Chiara Oppedisano");
- metaData.SetComment("Filling AliZDCMBCalib object");
- //
- //mbCalib->Dump();
- //
- resMBCal = Store("Calib","MBCalib",mbCalib, &metaData, 0, kTRUE);
- printf(" here 1000\n");
- if(resMBCal==kFALSE) return 19;
- }
- delete daqSources; daqSources = 0;
-
- return 0;
-}
-
-//______________________________________________________________________________________________
-UInt_t AliZDCPreprocessor::Process(TMap* dcsAliasMap)
-{
- UInt_t resDCS = 0;
- UInt_t resChMap=0;
- UInt_t resEnergyCalib=0, resPedestalCalib=0, resLaserCalib=0, resMBCalib=0;
-
- // ************************* Process DCS data ****************************
- if(ProcessDCS()) resDCS = ProcessDCSData(dcsAliasMap);
-
- // ********************************* From DAQ ************************************
-
- const char* beamType = GetRunParameter("beamType");
- TString runType = GetRunType();
- Float_t beamEnergy = (Float_t)(((TString)GetRunParameter("beamEnergy")).Atof());
- printf("\t **** AliZDCPreprocessor -> runType %s, beamType %s, beamEnergy %1.0f ****\n",
- runType.Data(),beamType,beamEnergy);
-
- // ******************************************
- // ADC channel mapping
- // ******************************************
- resChMap = ProcessChMap();
-
- // ******************************************
- // Calibration param. for p-p data (all = 1)
- // ******************************************
- // NO ENERGY CALIBRATION -> coefficients set to 1.
- // Temp -> also inter-calibration coefficients are set to 1.
- if((strcmp(beamType,"p-p")==0) || (strcmp(beamType,"P-P")==0)
- || (strcmp(beamType,"P-A")==0) || (strcmp(beamType,"A-P")==0))
- resEnergyCalib = ProcessppData();
-
- // *****************************************************
- // CALIBRATION_EMD -> Energy calibration and equalization
- // *****************************************************
- if((strcmp(beamType,"A-A")==0) && (runType.CompareTo("CALIBRATION_EMD")==0))
- resEnergyCalib = ProcessCalibData(beamEnergy);
-
- // *****************************************************
- // STANDALONE_PEDESTALS -> Pedestal subtraction
- // *****************************************************
- if(runType.CompareTo("STANDALONE_PEDESTAL")==0) resPedestalCalib = ProcessPedestalData();
-
- // *****************************************************
- // STANDALONE_LASER -> Signal stability and ageing
- // *****************************************************
- else if(runType.CompareTo("STANDALONE_LASER")==0) resLaserCalib = ProcessLaserData();
-
- // *****************************************************
- // CALIBRATION_MB -> Signal stability and ageing
- // *****************************************************
- else if(runType.CompareTo("CALIBRATION_MB")==0) resMBCalib = ProcessMBCalibData();
-
- if(resDCS!=0) return resDCS;
- else if(resChMap!=0) return resChMap;
- else if(resEnergyCalib!=0) return resEnergyCalib;
- else if(resPedestalCalib!=0) return resPedestalCalib;
- else if(resLaserCalib!=0) return resLaserCalib;
- else if(resMBCalib!=0) return resMBCalib;
-
- return 0;
-
-}