ZDC/AliZDCPreprocessor.cxx

   1 // --- ROOT system
   2 #include <TFile.h>
   3 #include <TClonesArray.h>
   4 #include <TList.h>
   5 #include <TObjString.h>
   6 #include <TTimeStamp.h>
   7
   8 #include "AliZDCPreprocessor.h"
   9 #include "AliCDBManager.h"
  10 #include "AliCDBEntry.h"
  11 #include "AliCDBMetaData.h"
  12 #include "AliDCSValue.h"
  13 #include "AliAlignObj.h"
  14 #include "AliAlignObjParams.h"
  15 #include "AliLog.h"
  16 #include "AliZDCDataDCS.h"
  17 #include "AliZDCChMap.h"
  18 #include "AliZDCPedestals.h"
  19 #include "AliZDCLaserCalib.h"
  20 #include "AliZDCEnCalib.h"
  21 #include "AliZDCTowerCalib.h"
  22 #include "AliZDCMBCalib.h"
  23 #include "AliZDCTDCCalib.h"
  24
  25 /////////////////////////////////////////////////////////////////////
  26 //                                                                 //
  27 // Class implementing Shuttle ZDC pre-processor.                   //
  28 // It takes data from DCS and DAQ and writes calibration objects   //
  29 // in the OCDB and reference values/histos in the ReferenceData.   //
  30 //                                                                 //
  31 /////////////////////////////////////////////////////////////////////
  32
  33 // ******************************************************************
  34 //    RETURN CODES:
  35 // return 0 : everything OK
  36 // return 1 : no DCS input data Map
  37 // return 2 : error storing DCS data in RefData
  38 // return 3 : error storing alignment object in OCDB
  39 // return 4 : error in ZDCMapping.dat file retrieved from DAQ FXS (not existing|empty|corrupted)
  40 // return 5 : error storing mapping obj. in OCDB
  41 // return 6 : error storing energy calibration obj. in OCDB
  42 // return 7 : error storing tower inter-calibration obj. in OCDB
  43 // return 8 : error in ZDCEnergyCalib.dat file retrieved from DAQ FXS
  44 // return 9 : error in ZDCTowerCalib.dat file retrieved from DAQ FXS
  45 // return 10: error in ZDCPedestal.dat file retrieved from DAQ FXS
  46 // return 11: error storing pedestal calibration obj. in OCDB
  47 // return 12: error in ZDCPedHisto.root file retrieved from DAQ FXS
  48 // return 13: error storing pedestal histos in RefData
  49 // return 14: error in ZDCLaserCalib.dat file retrieved from DAQ FXS
  50 // return 15: error storing laser calibration obj. in OCDB
  51 // return 16: error in ZDCLaserHisto.root file retrieved from DAQ FXS
  52 // return 17: error storing laser histos in RefData
  53 // return 18: error in ZDCMBCalib.root file retrieved from DAQ FXS
  54 // return 19: error storing MB calibration obj. in OCDB
  55 // return 20: error in ZDCTDCCalib.root file retrieved from DAQ FXS
  56 // return 21: error in storing TDC calibration obj. in OCDB
  57 // return 22: error in ZDCTDCHisto.root file retrieved from DAQ FXS
  58 // Return 23: error storing TDC reference histos in RefData
  59 // ******************************************************************
  60
  61 ClassImp(AliZDCPreprocessor)
  62
  63 //______________________________________________________________________________________________
  64 AliZDCPreprocessor::AliZDCPreprocessor(AliShuttleInterface* shuttle) :
  65   AliPreprocessor("ZDC", shuttle),
  66   fData(0)
  67 {
  68   // constructor
  69   // May 2009 - run types updated according to
  70   // http://alice-ecs.web.cern.ch/alice-ecs/runtypes_3.36.html
  71   AddRunType("STANDALONE_PEDESTAL");
  72   AddRunType("STANDALONE_LASER");
  73   AddRunType("STANDALONE_COSMIC");
  74   AddRunType("CALIBRATION_EMD");
  75   AddRunType("CALIBRATION_MB");
  76   AddRunType("CALIBRATION_CENTRAL");
  77   AddRunType("CALIBRATION_SEMICENTRAL");
  78   AddRunType("CALIBRATION_BC");
  79   AddRunType("PHYSICS");
  80 }
  81
  82
  83 //______________________________________________________________________________________________
  84 AliZDCPreprocessor::~AliZDCPreprocessor()
  85 {
  86   // destructor
  87 }
  88
  89
  90 //______________________________________________________________________________________________
  91 void AliZDCPreprocessor::Initialize(Int_t run, UInt_t startTime, UInt_t endTime)
  92 {
  93   // Creates AliZDCDataDCS object
  94
  95   AliPreprocessor::Initialize(run, startTime, endTime);
  96
  97   AliDebug(2,Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s \n\tStartTime DCS Query %s \n\tEndTime DCS Query %s", run,
  98                 TTimeStamp(startTime).AsString(),
  99                 TTimeStamp(endTime).AsString(), ((TTimeStamp)GetStartTimeDCSQuery()).AsString(), ((TTimeStamp)GetEndTimeDCSQuery()).AsString()));
 100
 101   fRun = run;
 102   fStartTime = startTime;
 103   fEndTime = endTime;
 104
 105   fData = new AliZDCDataDCS(fRun, fStartTime, fEndTime, GetStartTimeDCSQuery(), GetEndTimeDCSQuery());
 106 }
 107
 108 //_____________________________________________________________________________
 109 Bool_t AliZDCPreprocessor::ProcessDCS(){
 110
 111   // tells whether DCS should be processed or not
 112
 113   TString runType = GetRunType();
 114   Log(Form("RunType %s",runType.Data()));
 115
 116   if (runType=="STANDALONE_COSMIC" || runType=="STANDALONE_PEDESTAL"){
 117     return kFALSE;
 118   }
 119
 120   return kTRUE;
 121 }
 122
 123 //______________________________________________________________________________________________
 124 UInt_t AliZDCPreprocessor::ProcessDCSData(TMap* dcsAliasMap)
 125 {
 126
 127   // Fills data into a AliZDCDataDCS object
 128   if(!dcsAliasMap){
 129     Log(" No DCS map found: ZDC exiting from Shuttle");
 130     if(fData){
 131       delete fData;
 132       fData = 0;
 133     }
 134     return 1;
 135   }
 136
 137   Log(Form("Processing data from DCS"));
 138
 139   // The processing of the DCS input data is forwarded to AliZDCDataDCS
 140   //dcsAliasMap->Print("");
 141   Bool_t resDCSProcess = fData->ProcessData(*dcsAliasMap);
 142   if(resDCSProcess==kFALSE){
 143     Log(" Problems in processing DCS DP");
 144     return 1;
 145   }
 146
 147   // ------------------------------------------------------
 148   // Change introduced 26/9/09 in order NOT to process the
 149   // HV DP since some of them are never found in amanda DB
 150   // ------------------------------------------------------
 151   // Store DCS data as reference
 152   AliCDBMetaData metadata;
 153   metadata.SetResponsible("Chiara Oppedisano");
 154   metadata.SetComment("DCS DP TMap for ZDC");
 155   Bool_t resDCSRef = kTRUE;
 156   resDCSRef = StoreReferenceData("DCS","Data", dcsAliasMap, &metadata);
 157
 158   if(resDCSRef==kFALSE) return 2;
 159
 160   // --- Writing ZDC table positions into alignment object
 161   TClonesArray *array = new TClonesArray("AliAlignObjParams",10);
 162   TClonesArray &alobj = *array;
 163   AliAlignObjParams a;
 164   Double_t dx=0., dz=0., dpsi=0., dtheta=0., dphi=0.;
 165   // Vertical table position in mm from DCS
 166   Double_t dyZN1 = (Double_t) (fData->GetAlignData(0)/10.);
 167   Double_t dyZP1 = (Double_t) (fData->GetAlignData(1)/10.);
 168   Double_t dyZN2 = (Double_t) (fData->GetAlignData(2)/10.);
 169   Double_t dyZP2 = (Double_t) (fData->GetAlignData(3)/10.);
 170   //
 171   const char *n1ZDC="ZDC/NeutronZDC_C";
 172   const char *p1ZDC="ZDC/ProtonZDC_C";
 173   const char *n2ZDC="ZDC/NeutronZDC_A";
 174   const char *p2ZDC="ZDC/ProtonZDC_A";
 175   //
 176   UShort_t iIndex=0;
 177   AliGeomManager::ELayerID iLayer = AliGeomManager::kInvalidLayer;
 178   UShort_t volid = AliGeomManager::LayerToVolUID(iLayer,iIndex);
 179   //
 180   new(alobj[0]) AliAlignObjParams(n1ZDC, volid, dx, dyZN1, dz, dpsi, dtheta, dphi, kTRUE);
 181   new(alobj[1]) AliAlignObjParams(p1ZDC, volid, dx, dyZP1, dz, dpsi, dtheta, dphi, kTRUE);
 182   new(alobj[2]) AliAlignObjParams(n2ZDC, volid, dx, dyZN2, dz, dpsi, dtheta, dphi, kTRUE);
 183   new(alobj[3]) AliAlignObjParams(p2ZDC, volid, dx, dyZP2, dz, dpsi, dtheta, dphi, kTRUE);
 184
 185   // save in CDB storage
 186   AliCDBMetaData mdDCS;
 187   mdDCS.SetResponsible("Chiara Oppedisano");
 188   mdDCS.SetComment("Alignment object for ZDC");
 189   Bool_t resultAl = Store("Align","Data", array, &mdDCS, 0, kFALSE);
 190   if(resultAl==kFALSE)  return 3;
 191
 192   return 0;
 193 }
 194
 195 //______________________________________________________________________________________________
 196 UInt_t AliZDCPreprocessor::ProcessChMap()
 197 {
 198   const int kNModules=10, kNch=48, kNScch=32, kNtdcch=32;
 199
 200   // Reading the file for mapping from FXS
 201   TList* daqSource = GetFileSources(kDAQ, "MAPPING");
 202   if(!daqSource){
 203     AliError(Form("No sources for file ZDCChMapping.dat in run %d ", fRun));
 204     return 4;
 205   }
 206   if(daqSource->GetEntries()==0) return 4;
 207   Log("\t List of DAQ sources for MAPPING id: "); daqSource->Print();
 208   //
 209   TIter iter(daqSource);
 210   TObjString* source = 0;
 211   Int_t isou = 0;
 212   Int_t modMap[kNModules][3], adcMap[kNch][6], scMap[kNScch][6], tdcMap[kNtdcch][4];
 213   //
 214   while((source = dynamic_cast<TObjString*> (iter.Next()))){
 215      TString fileName = GetFile(kDAQ, "MAPPING", source->GetName());
 216      Log(Form("\t Getting file #%d: ZDCChMapping.dat from %s\n",++isou, source->GetName()));
 217
 218      if(fileName.Length() <= 0){
 219        Log(Form("No file from source %s!", source->GetName()));
 220        return 4;
 221      }
 222      // --- Reading file with calibration data
 223      //const char* fname = fileName.Data();
 224      if(fileName){
 225        FILE *file;
 226        if((file = fopen(fileName,"r")) == NULL){
 227          printf("Cannot open file %s \n",fileName.Data());
 228          return 4;
 229        }
 230        Log(Form("File %s connected to process data for ADC mapping", fileName.Data()));
 231        //
 232        for(Int_t j=0; j<kNch; j++){
 233            for(Int_t k=0; k<6; k++){
 234              int read = fscanf(file,"%d",&adcMap[j][k]);
 235              if(read == 0) AliDebug(3," Failing in reading data from mapping file");
 236            }
 237        }
 238        for(Int_t j=kNch; j<kNch+kNScch; j++){
 239            for(Int_t k=0; k<6; k++){
 240              int read = fscanf(file,"%d",&scMap[j-kNch][k]);
 241              if(read == 0) AliDebug(3," Failing in reading data from mapping file");
 242            }
 243        }
 244        for(Int_t j=kNch+kNScch; j<kNch+kNScch+kNtdcch; j++){
 245            for(Int_t k=0; k<4; k++){
 246              int read = fscanf(file,"%d",&tdcMap[j-kNch-kNScch][k]);
 247              if(read == 0) AliDebug(3," Failing in reading data from mapping file");
 248            }
 249        }
 250        for(Int_t j=kNch+kNScch+kNtdcch; j<kNch+kNScch+kNtdcch+kNModules; j++){
 251            for(Int_t k=0; k<3; k++){
 252              int read = fscanf(file,"%d",&modMap[j-kNch-kNScch-kNtdcch][k]);
 253              if(read == 0) AliDebug(3," Failing in reading data from mapping file");
 254            }
 255        }
 256        fclose(file);
 257      }
 258      else{
 259        Log(Form("File %s not found", fileName.Data()));
 260        return 4;
 261      }
 262   }
 263
 264   // Store the currently read map ONLY IF it is different
 265   // from the entry in the OCDB
 266   Bool_t adcMapUpdated=kFALSE, scMapUpdated=kFALSE, tdcMapUpdated=kFALSE;
 267   Bool_t updateOCDB = kFALSE;
 268
 269   AliCDBEntry *cdbEntry = GetFromOCDB("Calib","ChMap");
 270   if(!cdbEntry){
 271     Log(" No existing CDB entry for ADC mapping");
 272     updateOCDB = kTRUE;
 273   }
 274   else{
 275     AliZDCChMap *chMap = (AliZDCChMap*) cdbEntry->GetObject();
 276     for(Int_t i=0; i<kNch; i++){
 277       if(  (adcMap[i][1] != chMap->GetADCModule(i))
 278         || (adcMap[i][2] != chMap->GetADCChannel(i))
 279         || (adcMap[i][3] != chMap->GetADCSignalCode(i))
 280         || (adcMap[i][4] != chMap->GetDetector(i))
 281         || (adcMap[i][5] != chMap->GetSector(i)))
 282          adcMapUpdated = kTRUE;
 283     }
 284     for(Int_t i=0; i<kNScch; i++){
 285       if(  (scMap[i][2] != chMap->GetScChannel(i))
 286         || (scMap[i][3] != chMap->GetScSignalCode(i)) )
 287          scMapUpdated = kTRUE;
 288     }
 289     for(Int_t i=0; i<kNtdcch; i++){
 290       if(  (tdcMap[i][2] != chMap->GetTDCChannel(i))
 291         || (tdcMap[i][3] != chMap->GetTDCSignalCode(i)))
 292          tdcMapUpdated = kTRUE;
 293     }
 294   }
 295   if(adcMapUpdated || scMapUpdated || tdcMapUpdated) updateOCDB = kTRUE;
 296   //
 297   Bool_t resChMapStore = kTRUE;
 298   if(updateOCDB==kTRUE){
 299     Log(" A new entry ZDC/Calib/ChMap will be created");
 300     //
 301     // --- Initializing mapping calibration object
 302     AliZDCChMap *mapCalib = new AliZDCChMap("ZDC");
 303     // Writing channel map in the OCDB
 304     for(Int_t k=0; k<kNModules; k++){
 305       mapCalib->SetModuleMap(k, modMap[k][0], modMap[k][1], modMap[k][2]);
 306     }
 307     for(Int_t k=0; k<kNch; k++){
 308       mapCalib->SetADCModule(k,adcMap[k][1]);
 309       mapCalib->SetADCChannel(k,adcMap[k][2]);
 310       mapCalib->SetADCSignalCode(k,adcMap[k][3]);
 311       mapCalib->SetDetector(k,adcMap[k][4]);
 312       mapCalib->SetSector(k,adcMap[k][5]);
 313     }
 314     for(Int_t k=0; k<kNScch; k++){
 315        mapCalib->SetScChannel(k, scMap[k][2]);
 316        mapCalib->SetScSignalCode(k, scMap[k][3]);
 317        mapCalib->SetScDetector(k, scMap[k][4]);
 318        mapCalib->SetScSector(k, scMap[k][5]);
 319     }
 320     for(Int_t k=0; k<kNtdcch; k++){
 321        mapCalib->SetTDCChannel(k, tdcMap[k][2]);
 322        mapCalib->SetTDCSignalCode(k, tdcMap[k][3]);
 323     }
 324     //
 325     //mapCalib->Print("");
 326     //
 327     AliCDBMetaData metaData;
 328     metaData.SetBeamPeriod(0);
 329     metaData.SetResponsible("Chiara Oppedisano");
 330     metaData.SetComment("AliZDCChMap object created by ZDC preprocessor");
 331     //
 332     resChMapStore = Store("Calib","ChMap",mapCalib, &metaData, 0, kTRUE);
 333     printf("  Mapping object stored in OCDB\n");
 334   }
 335   else{
 336     Log(" ZDC/Calib/ChMap entry in OCDB is valid and won't be updated");
 337     resChMapStore = kTRUE;
 338   }
 339   delete daqSource; daqSource=0;
 340
 341   TString runType = GetRunType();
 342   if(runType.CompareTo("PHYSICS")==0){
 343     Log(Form("RunType %s -> producing TDC calibration data",runType.Data()));
 344
 345     // Reading the file for mapping from FXS
 346     TList* daqSourcetdc = GetFileSources(kDAQ, "TDCDATA");
 347     if(!daqSourcetdc){
 348       AliError(Form("No sources for file ZDCChMappingTDCCalib.dat in run %d ", fRun));
 349       return 20;
 350     }
 351     if(daqSourcetdc->GetEntries()==0) return 20;
 352     Log("\t List of DAQ sources for TDCDATA id: "); daqSourcetdc->Print();
 353     //
 354     Bool_t resTDCcal = kTRUE;
 355     TIter itertdc(daqSourcetdc);
 356     TObjString* sourcetdc = 0;
 357     Int_t isoutdc = 0;
 358     //
 359     while((sourcetdc = dynamic_cast<TObjString*> (itertdc.Next()))){
 360      TString fileNametdc = GetFile(kDAQ, "TDCDATA", sourcetdc->GetName());
 361      Log(Form("\t Getting file #%d: ZDCTDCdata.dat from %s\n",++isoutdc, sourcetdc->GetName()));
 362
 363      if(fileNametdc.Length() <= 0){
 364        Log(Form("No file from source %s!", sourcetdc->GetName()));
 365        return 20;
 366      }
 367      // --- Initializing TDC calibration object
 368      AliZDCTDCCalib *tdcCalib = new AliZDCTDCCalib("ZDC");
 369      // --- Reading file with calibration data
 370      //const char* fname = fileName.Data();
 371      if(fileNametdc){
 372        FILE *filetdc;
 373        if((filetdc = fopen(fileNametdc,"r")) == NULL){
 374          printf("Cannot open file %s \n",fileNametdc.Data());
 375          return 20;
 376        }
 377        Log(Form("File %s connected to process TDC data", fileNametdc.Data()));
 378        //
 379        Float_t tdcMean[6][2];
 380        for(Int_t it=0; it<6; it++){
 381          for(Int_t iu=0; iu<2; iu++) tdcMean[it][iu]=0.;
 382        }
 383        for(Int_t k=0; k<6; k++){
 384         for(Int_t j=0; j<2; j++){
 385            int leggi = fscanf(filetdc,"%f",&tdcMean[k][j]);
 386            if(leggi==0) AliDebug(3," Failing reading data from tdc file");
 387            tdcCalib->SetMeanTDC(k, tdcMean[k][0]);
 388            tdcCalib->SetWidthTDC(k, tdcMean[k][1]);
 389         }
 390        }
 391        fclose(filetdc);
 392      }
 393      else{
 394        Log(Form("File %s not found", fileNametdc.Data()));
 395        return 20;
 396      }
 397      //
 398      AliCDBMetaData metaData;
 399      metaData.SetBeamPeriod(0);
 400      metaData.SetResponsible("Chiara Oppedisano");
 401      metaData.SetComment("Filling AliZDCTDCCalib object");
 402      //
 403      resTDCcal = Store("Calib","TDCCalib",tdcCalib, &metaData, 0, kTRUE);
 404      if(resTDCcal==kFALSE) return 21;
 405     }
 406     delete daqSourcetdc; daqSourcetdc = 0;
 407
 408     Bool_t restdcHist = kTRUE;
 409     TList* daqSourceH = GetFileSources(kDAQ, "TDCHISTOS");
 410     if(!daqSourceH){
 411       Log(Form("No source for TDCHISTOS id run %d !", fRun));
 412       return 22;
 413     }
 414     Log("\t List of DAQ sources for TDCHISTOS id: "); daqSourceH->Print();
 415     //
 416     TIter iterH(daqSourceH);
 417     TObjString* sourceH = 0;
 418     Int_t iH=0;
 419     while((sourceH = dynamic_cast<TObjString*> (iterH.Next()))){
 420      TString stringTDCFileName = GetFile(kDAQ, "TDCHISTOS", sourceH->GetName());
 421      if(stringTDCFileName.Length() <= 0){
 422         Log(Form("No TDCHISTOS file from source %s!", sourceH->GetName()));
 423         return 22;
 424      }
 425      const char* tdcFileName = stringTDCFileName.Data();
 426      Log(Form("\t Getting file #%d: %s from %s\n",++iH, tdcFileName, sourceH->GetName()));
 427      restdcHist = StoreReferenceFile(tdcFileName, "tdcReference.root");
 428      if(restdcHist==kFALSE) return 23;
 429     }
 430     delete daqSourceH; daqSourceH=0;
 431   }
 432
 433     if(resChMapStore==kFALSE) return 5;
 434     else return 0;
 435
 436 }
 437
 438 //______________________________________________________________________________________________
 439 UInt_t AliZDCPreprocessor::ProcessppData()
 440 {
 441    Bool_t resEnCal=kTRUE, resTowCal=kTRUE;
 442
 443    // *********** Energy calibration
 444    // --- Cheking if there is already the entry in the OCDB
 445    AliCDBEntry *cdbEnEntry = GetFromOCDB("Calib", "EnergyCalib");
 446    if(!cdbEnEntry){
 447      Log(Form(" ZDC/Calib/EnergyCalib entry will be created"));
 448      // --- Initializing calibration object
 449      AliCDBMetaData metaData;
 450      metaData.SetBeamPeriod(0);
 451      metaData.SetResponsible("Chiara Oppedisano");
 452      //
 453      AliZDCEnCalib *eCalib = new AliZDCEnCalib("ZDC");
 454      for(Int_t j=0; j<6; j++) eCalib->SetEnCalib(j,1.);
 455      metaData.SetComment("AliZDCEnCalib object");
 456      //eCalib->Print("");
 457      resEnCal = Store("Calib", "EnergyCalib", eCalib, &metaData, 0, kTRUE);
 458    }
 459    else{
 460      // if entry exists it is still valid (=1 for all runs!)
 461      Log(Form(" Valid ZDC/Calib/EnergyCalib object already existing in OCDB!!!"));
 462      resEnCal = kTRUE;
 463    }
 464
 465    if(resEnCal==kFALSE) return 6;
 466
 467    //
 468    // *********** Tower inter-calibration
 469    // --- Cheking if there is already the entry in the OCDB
 470    AliCDBEntry *cdbTowEntry = GetFromOCDB("Calib", "TowerCalib");
 471    if(!cdbTowEntry){
 472      AliZDCTowerCalib *towCalib = new AliZDCTowerCalib("ZDC");
 473      for(Int_t j=0; j<5; j++){
 474         towCalib->SetZN1EqualCoeff(j, 1.);
 475         towCalib->SetZP1EqualCoeff(j, 1.);
 476         towCalib->SetZN2EqualCoeff(j, 1.);
 477         towCalib->SetZP2EqualCoeff(j, 1.);
 478      }
 479      //towCalib->Print("");
 480      //
 481      AliCDBMetaData metaData;
 482      metaData.SetBeamPeriod(0);
 483      metaData.SetResponsible("Chiara Oppedisano");
 484      metaData.SetComment("AliZDCTowerCalib object");
 485      //
 486      resTowCal = Store("Calib", "TowerCalib", towCalib, &metaData, 0, kTRUE);
 487    }
 488    else{
 489      // if entry exists it is still valid (=1 for all runs!)
 490      Log(Form(" Valid ZDC/Calib/TowerCalib object already existing in OCDB!!!"));
 491      resTowCal = kTRUE;
 492    }
 493
 494    if(resTowCal==kFALSE) return 7;
 495
 496    return 0;
 497 }
 498
 499 //______________________________________________________________________________________________
 500 UInt_t AliZDCPreprocessor::ProcessCalibData(Float_t beamEnergy)
 501 {
 502   TList* daqSources = GetFileSources(kDAQ, "EMDENERGYCALIB");
 503   if(!daqSources){
 504     AliError(Form("No sources for CALIBRATION_EMD run %d !", fRun));
 505     return 8;
 506   }
 507   Log("\t List of DAQ sources for EMDENERGYCALIB id: "); daqSources->Print();
 508   //
 509   TIter iter2(daqSources);
 510   TObjString* source = 0;
 511   Int_t i=0;
 512   Bool_t resEnCal=kTRUE, resTowCal=kTRUE;
 513
 514   while((source = dynamic_cast<TObjString*> (iter2.Next()))){
 515     TString stringEMDFileName = GetFile(kDAQ, "EMDENERGYCALIB", source->GetName());
 516     if(stringEMDFileName.Length() <= 0){
 517       Log(Form("No file from source %s!", source->GetName()));
 518       return 8;
 519     }
 520     const char* emdFileName = stringEMDFileName.Data();
 521     Log(Form("\t Getting file #%d: %s from %s\n",++i,emdFileName,source->GetName()));
 522     //
 523     // --- Initializing energy calibration object
 524     AliZDCEnCalib *eCalib = new AliZDCEnCalib("ZDC");
 525     // --- Reading file with calibration data
 526     if(emdFileName){
 527       FILE *file;
 528       if((file = fopen(emdFileName,"r")) == NULL){
 529         printf("Cannot open file %s \n",emdFileName);
 530         return 8;
 531       }
 532       Log(Form("File %s connected to process data from EM dissociation events", emdFileName));
 533       //
 534       Float_t fitValEMD[6];
 535       for(Int_t j=0; j<6; j++){
 536         if(j<6){
 537           int iread = fscanf(file,"%f",&fitValEMD[j]);
 538           if(iread==0) AliDebug(3," Failing reading data from EMD calibration data file");
 539           if(fitValEMD[j]!=1.) eCalib->SetEnCalib(j, beamEnergy/fitValEMD[j]);
 540           else eCalib->SetEnCalib(j, fitValEMD[j]);
 541         }
 542       }
 543       //
 544       fclose(file);
 545     }
 546     else{
 547       Log(Form("File %s not found", emdFileName));
 548       return 8;
 549     }
 550     //eCalib->Print("");
 551     //
 552     AliCDBMetaData metaData;
 553     metaData.SetBeamPeriod(0);
 554     metaData.SetResponsible("Chiara Oppedisano");
 555     metaData.SetComment("Filling AliZDCEnCalib object");
 556     //
 557     resEnCal = Store("Calib","EnergyCalib",eCalib, &metaData, 0, kTRUE);
 558     if(resEnCal==kFALSE) return 6;
 559   }
 560   delete daqSources; daqSources = 0;
 561
 562   TList* daqSourcesH = GetFileSources(kDAQ, "EMDTOWERCALIB");
 563   if(!daqSourcesH){
 564     AliError(Form("No sources for CALIBRATION_EMD run %d !", fRun));
 565     return 9;
 566   }
 567   Log("\t List of DAQ sources for EMDTOWERCALIB id: "); daqSourcesH->Print();
 568   //
 569   TIter iter2H(daqSourcesH);
 570   TObjString* sourceH = 0;
 571   Int_t iH=0;
 572   while((sourceH = dynamic_cast<TObjString*> (iter2H.Next()))){
 573     TString stringtowEMDFileName = GetFile(kDAQ, "EMDTOWERCALIB", sourceH->GetName());
 574     if(stringtowEMDFileName.Length() <= 0){
 575       Log(Form("No file from source %s!", sourceH->GetName()));
 576       return 9;
 577     }
 578     const char * towEMDFileName = stringtowEMDFileName.Data();
 579     Log(Form("\t Getting file #%d: %s from source %s\n",++iH,towEMDFileName,sourceH->GetName()));
 580     // --- Initializing energy calibration object
 581     AliZDCTowerCalib *towCalib = new AliZDCTowerCalib("ZDC");
 582     // --- Reading file with calibration data
 583     if(towEMDFileName){
 584       FILE *file;
 585       if((file = fopen(towEMDFileName,"r")) == NULL){
 586         printf("Cannot open file %s \n",towEMDFileName);
 587         return 9;
 588       }
 589       //
 590       Float_t equalCoeff[4][5];
 591       for(Int_t j=0; j<4; j++){
 592          for(Int_t k=0; k<5; k++){
 593            int leggi = fscanf(file,"%f",&equalCoeff[j][k]);
 594            if(leggi==0) AliDebug(3," Failing reading data from EMD calibration file");
 595            if(j==0)      towCalib->SetZN1EqualCoeff(k, equalCoeff[j][k]);
 596            else if(j==1) towCalib->SetZP1EqualCoeff(k, equalCoeff[j][k]);
 597            else if(j==2) towCalib->SetZN2EqualCoeff(k, equalCoeff[j][k]);
 598            else if(j==3) towCalib->SetZP2EqualCoeff(k, equalCoeff[j][k]);
 599          }
 600       }
 601       //
 602       fclose(file);
 603     }
 604     else{
 605       Log(Form("File %s not found", towEMDFileName));
 606       return 9;
 607     }
 608     //towCalib->Print("");
 609     //
 610     AliCDBMetaData metaData;
 611     metaData.SetBeamPeriod(0);
 612     metaData.SetResponsible("Chiara Oppedisano");
 613     metaData.SetComment("Filling AliZDCTowerCalib object");
 614     //
 615     resTowCal = Store("Calib","TowerCalib",towCalib, &metaData, 0, kTRUE);
 616     if(resTowCal==kFALSE) return 7;
 617   }
 618   delete daqSourcesH; daqSourcesH = 0;
 619
 620
 621   return 0;
 622 }
 623
 624 //______________________________________________________________________________________________
 625 UInt_t AliZDCPreprocessor::ProcessPedestalData()
 626 {
 627   TList* daqSources = GetFileSources(kDAQ, "PEDESTALDATA");
 628   if(!daqSources){
 629     Log(Form("No source for STANDALONE_PEDESTAL run %d !", fRun));
 630     return 10;
 631   }
 632   if(daqSources->GetEntries()==0) return 10;
 633   Log("\t List of DAQ sources for PEDESTALDATA id: "); daqSources->Print();
 634   //
 635   TIter iter(daqSources);
 636   TObjString* source;
 637   Int_t i=0;
 638   Bool_t resPedCal=kTRUE, resPedHist=kTRUE;
 639
 640   while((source = dynamic_cast<TObjString*> (iter.Next()))){
 641      TString stringPedFileName = GetFile(kDAQ, "PEDESTALDATA", source->GetName());
 642      if(stringPedFileName.Length() <= 0){
 643         Log(Form("No PEDESTALDATA file from source %s!", source->GetName()));
 644         return 10;
 645      }
 646      const char* pedFileName = stringPedFileName.Data();
 647      Log(Form("\t Getting file #%d: %s from %s\n",++i,pedFileName,source->GetName()));
 648      //
 649      // --- Initializing pedestal calibration object
 650      AliZDCPedestals *pedCalib = new AliZDCPedestals("ZDC");
 651      // --- Reading file with pedestal calibration data
 652      // no. ADCch = (22 signal ch. + 2 reference PMs) * 2 gain chain = 48
 653      const Int_t knZDCch = 48;
 654      FILE *file;
 655      if((file = fopen(pedFileName,"r")) == NULL){
 656        printf("Cannot open file %s \n",pedFileName);
 657        return 10;
 658      }
 659      Log(Form("File %s connected to process pedestal data", pedFileName));
 660      Float_t pedVal[(3*knZDCch)][2];
 661      for(Int_t k=0; k<(3*knZDCch); k++){
 662         for(Int_t j=0; j<2; j++){
 663            int aleggi = fscanf(file,"%f",&pedVal[k][j]);
 664            if(aleggi==0) AliDebug(3," Failing reading data from pedestal file");
 665            //if(j==1) printf("pedVal[%d] -> %f, %f \n",k,pedVal[k][0],pedVal[k][1]);
 666         }
 667         if(k<knZDCch){
 668           pedCalib->SetMeanPed(k,pedVal[k][0]);
 669           pedCalib->SetMeanPedWidth(k,pedVal[k][1]);
 670         }
 671         else if(k>=knZDCch && k<(2*knZDCch)){
 672           pedCalib->SetOOTPed(k-knZDCch,pedVal[k][0]);
 673           pedCalib->SetOOTPedWidth(k-knZDCch,pedVal[k][1]);
 674         }
 675         else if(k>=(2*knZDCch) && k<(3*knZDCch)){
 676           pedCalib->SetPedCorrCoeff(k-(2*knZDCch),pedVal[k][0],pedVal[k][1]);
 677         }
 678      }
 679      fclose(file);
 680      //pedCalib->Print("");
 681      //
 682      AliCDBMetaData metaData;
 683      metaData.SetBeamPeriod(0);
 684      metaData.SetResponsible("Chiara Oppedisano");
 685      metaData.SetComment("Filling AliZDCPedestals object");
 686      //
 687      resPedCal = Store("Calib","Pedestals",pedCalib, &metaData, 0, kTRUE);
 688      if(resPedCal==kFALSE) return 11;
 689   }
 690   delete daqSources; daqSources = 0;
 691
 692   TList* daqSourceH = GetFileSources(kDAQ, "PEDESTALHISTOS");
 693   if(!daqSourceH){
 694     Log(Form("No source for PEDESTALHISTOS id run %d !", fRun));
 695     return 12;
 696   }
 697   Log("\t List of DAQ sources for PEDESTALHISTOS id: "); daqSourceH->Print();
 698   //
 699   TIter iterH(daqSourceH);
 700   TObjString* sourceH = 0;
 701   Int_t iH=0;
 702   while((sourceH = dynamic_cast<TObjString*> (iterH.Next()))){
 703      TString stringPedFileName = GetFile(kDAQ, "PEDESTALHISTOS", sourceH->GetName());
 704      if(stringPedFileName.Length() <= 0){
 705         Log(Form("No PEDESTALHISTOS file from source %s!", sourceH->GetName()));
 706         return 12;
 707      }
 708      const char* pedFileName = stringPedFileName.Data();
 709      Log(Form("\t Getting file #%d: %s from %s\n",++iH, pedFileName, sourceH->GetName()));
 710      resPedHist = StoreReferenceFile(pedFileName, "pedestalReference.root");
 711      if(resPedHist==kFALSE) return 13;
 712   }
 713   delete daqSourceH; daqSourceH=0;
 714
 715   return 0;
 716 }
 717
 718 //______________________________________________________________________________________________
 719 UInt_t AliZDCPreprocessor::ProcessLaserData()
 720 {
 721   TList* daqSources = GetFileSources(kDAQ, "LASERDATA");
 722   if(!daqSources){
 723     AliError(Form("No sources for STANDALONE_LASER run %d !", fRun));
 724     return 14;
 725   }
 726   if(daqSources->GetEntries()==0) return 14;
 727   Log("\t List of DAQ sources for LASERDATA id: "); daqSources->Print();
 728   //
 729   TIter iter2(daqSources);
 730   TObjString* source = 0;
 731   Int_t i=0;
 732   Bool_t resLaserCal=kTRUE, resLaserHist=kTRUE;
 733
 734   while((source = dynamic_cast<TObjString*> (iter2.Next()))){
 735      TString stringLaserFileName = GetFile(kDAQ, "LASERDATA", source->GetName());
 736      if(stringLaserFileName.Length() <= 0){
 737        Log(Form("No LASER file from source %s!", source->GetName()));
 738        return 14;
 739      }
 740      const char* laserFileName = stringLaserFileName.Data();
 741      Log(Form("\t Getting file #%d: %s from %s\n",++i,laserFileName,source->GetName()));
 742      //
 743      // --- Initializing pedestal calibration object
 744      AliZDCLaserCalib *lCalib = new AliZDCLaserCalib("ZDC");
 745      // --- Reading file with pedestal calibration data
 746      if(laserFileName){
 747        FILE *file;
 748        if((file = fopen(laserFileName,"r")) == NULL){
 749          printf("Cannot open file %s \n",laserFileName);
 750          return 14;
 751        }
 752        Log(Form("File %s connected to process data from LASER events", laserFileName));
 753        //
 754        Float_t ivalRead[22][4];
 755        for(Int_t j=0; j<22; j++){
 756           for(Int_t k=0; k<4; k++){
 757             int aleggi = fscanf(file,"%f",&ivalRead[j][k]);
 758             if(aleggi==0) AliDebug(3," Failng reading data from laser file");
 759             //printf(" %d %1.0f  ",k, ivalRead[j][k]);
 760           }
 761           lCalib->SetDetector(j, (Int_t) ivalRead[j][0]);
 762           lCalib->SetSector(j, (Int_t) ivalRead[j][1]);
 763           lCalib->SetfPMValue(j, ivalRead[j][2]);
 764           lCalib->SetfPMWidth(j, ivalRead[j][3]);
 765        }
 766        fclose(file);
 767      }
 768      else{
 769        Log(Form("File %s not found", laserFileName));
 770        return 14;
 771      }
 772      //lCalib->Print("");
 773      //
 774      AliCDBMetaData metaData;
 775      metaData.SetBeamPeriod(0);
 776      metaData.SetResponsible("Chiara Oppedisano");
 777      metaData.SetComment("Filling AliZDCLaserCalib object");
 778      //
 779      resLaserCal = Store("Calib","LaserCalib",lCalib, &metaData, 0, kTRUE);
 780      if(resLaserCal==kFALSE) return 15;
 781   }
 782   delete daqSources; daqSources = 0;
 783
 784   TList* daqSourceH = GetFileSources(kDAQ, "LASERHISTOS");
 785   if(!daqSourceH){
 786     AliError(Form("No sources for STANDALONE_LASER run %d !", fRun));
 787     return 16;
 788   }
 789   Log("\t List of DAQ sources for LASERHISTOS id: "); daqSourceH->Print();
 790   //
 791   TIter iter2H(daqSourceH);
 792   TObjString* sourceH = 0;
 793   Int_t iH=0;
 794   while((sourceH = dynamic_cast<TObjString*> (iter2H.Next()))){
 795      Log(Form("\t Getting file #%d\n",++iH));
 796      TString stringLaserFileName = GetFile(kDAQ, "LASERHISTOS", sourceH->GetName());
 797      if(stringLaserFileName.Length() <= 0){
 798        Log(Form("No LASER file from source %s!", sourceH->GetName()));
 799        return 16;
 800      }
 801      resLaserHist = StoreReferenceFile(stringLaserFileName.Data(), "laserReference.root");
 802      //
 803      if(resLaserHist==kFALSE) return 17;
 804   }
 805   delete daqSourceH; daqSourceH = 0;
 806
 807   return 0;
 808 }
 809
 810
 811 //______________________________________________________________________________________________
 812 UInt_t AliZDCPreprocessor::ProcessMBCalibData()
 813 {
 814   TList* daqSources = GetFileSources(kDAQ, "MBCALIB");
 815   if(!daqSources){
 816     AliError(Form("No sources for CALIBRATION_MB run %d !", fRun));
 817     return 18;
 818   }
 819   if(daqSources->GetEntries()==0) return 18;
 820   Log("\t List of DAQ sources for MBCALIB id: "); daqSources->Print();
 821   //
 822   TIter iter2(daqSources);
 823   TObjString* source = 0;
 824   Int_t i=0;
 825   Bool_t resMBCal=kTRUE;
 826
 827   while((source = dynamic_cast<TObjString*> (iter2.Next()))){
 828      TString stringMBFileName = GetFile(kDAQ, "MBCALIB", source->GetName());
 829      if(stringMBFileName.Length() <= 0){
 830        Log(Form("No MBCALIB file from source %s!", source->GetName()));
 831        return 18;
 832      }
 833      const char* mbFileName = stringMBFileName.Data();
 834      Log(Form("\t Getting file #%d: %s from %s\n",++i,mbFileName,source->GetName()));
 835      //
 836      // --- Initializing calibration object
 837      AliZDCMBCalib *mbCalib = new AliZDCMBCalib("ZDC");
 838      // --- Reading file with calibration data
 839      if(mbFileName){
 840        TFile * fileHistos = TFile::Open(mbFileName);
 841        Log(Form("File %s connected to process data from CALIBRATION_MB events", mbFileName));
 842        //
 843        fileHistos->cd();
 844        TH2F *hZDCvsZEM = (TH2F*)  fileHistos->Get("hZDCvsZEM");
 845        TH2F *hZDCCvsZEM = (TH2F*) fileHistos->Get("hZDCCvsZEM");
 846        TH2F *hZDCAvsZEM = (TH2F*) fileHistos->Get("hZDCAvsZEM");
 847        //
 848        mbCalib->SetZDCvsZEM(hZDCvsZEM);
 849        mbCalib->SetZDCCvsZEM(hZDCCvsZEM);
 850        mbCalib->SetZDCAvsZEM(hZDCAvsZEM);
 851        //
 852        //fileHistos->Close();
 853      }
 854      else{
 855        Log(Form("File %s not found", mbFileName));
 856        return 14;
 857      }
 858      //
 859      AliCDBMetaData metaData;
 860      metaData.SetBeamPeriod(0);
 861      metaData.SetResponsible("Chiara Oppedisano");
 862      metaData.SetComment("Filling AliZDCMBCalib object");
 863      //
 864      //mbCalib->Dump();
 865      //
 866      resMBCal = Store("Calib","MBCalib",mbCalib, &metaData, 0, kTRUE);
 867        printf(" here 1000\n");
 868      if(resMBCal==kFALSE) return 19;
 869   }
 870   delete daqSources; daqSources = 0;
 871
 872   return 0;
 873 }
 874
 875 //______________________________________________________________________________________________
 876 UInt_t AliZDCPreprocessor::Process(TMap* dcsAliasMap)
 877 {
 878  UInt_t resDCS = 0;
 879  UInt_t resChMap=0;
 880  UInt_t resEnergyCalib=0, resPedestalCalib=0, resLaserCalib=0, resMBCalib=0;
 881
 882  // ************************* Process DCS data ****************************
 883  if(ProcessDCS()) resDCS = ProcessDCSData(dcsAliasMap);
 884
 885  // ********************************* From DAQ ************************************
 886
 887  const char* beamType = GetRunParameter("beamType");
 888  TString runType = GetRunType();
 889  Float_t beamEnergy = (Float_t)(((TString)GetRunParameter("beamEnergy")).Atof());
 890  printf("\t **** AliZDCPreprocessor -> runType %s, beamType %s,  beamEnergy %1.0f ****\n",
 891         runType.Data(),beamType,beamEnergy);
 892
 893  // ******************************************
 894  // ADC channel mapping
 895  // ******************************************
 896  resChMap = ProcessChMap();
 897
 898  // ******************************************
 899  // Calibration param. for p-p data (all = 1)
 900  // ******************************************
 901  // NO ENERGY CALIBRATION -> coefficients set to 1.
 902  // Temp -> also inter-calibration coefficients are set to 1.
 903  if((strcmp(beamType,"p-p")==0) || (strcmp(beamType,"P-P")==0)
 904      || (strcmp(beamType,"P-A")==0) || (strcmp(beamType,"A-P")==0))
 905         resEnergyCalib = ProcessppData();
 906
 907  // *****************************************************
 908  // CALIBRATION_EMD -> Energy calibration and equalization
 909  // *****************************************************
 910  if((strcmp(beamType,"A-A")==0) && (runType.CompareTo("CALIBRATION_EMD")==0))
 911    resEnergyCalib =  ProcessCalibData(beamEnergy);
 912
 913  // *****************************************************
 914  // STANDALONE_PEDESTALS -> Pedestal subtraction
 915  // *****************************************************
 916  if(runType.CompareTo("STANDALONE_PEDESTAL")==0) resPedestalCalib = ProcessPedestalData();
 917
 918  // *****************************************************
 919  // STANDALONE_LASER -> Signal stability and ageing
 920  // *****************************************************
 921  else if(runType.CompareTo("STANDALONE_LASER")==0) resLaserCalib = ProcessLaserData();
 922
 923  // *****************************************************
 924  // CALIBRATION_MB -> Signal stability and ageing
 925  // *****************************************************
 926  else if(runType.CompareTo("CALIBRATION_MB")==0) resMBCalib = ProcessMBCalibData();
 927
 928  if(resDCS!=0)                return resDCS;
 929  else if(resChMap!=0)         return resChMap;
 930  else if(resEnergyCalib!=0)   return resEnergyCalib;
 931  else if(resPedestalCalib!=0) return resPedestalCalib;
 932  else if(resLaserCalib!=0)    return resLaserCalib;
 933  else if(resMBCalib!=0)       return resMBCalib;
 934
 935  return 0;
 936
 937 }