[u/mrichter/AliRoot.git] / MUON / MUONTRKGAINda.cxx

/*
 Contact: Jean-Luc Charvet <jean-luc.charvet@cern.ch>
 Link: http://aliceinfo.cern.ch/static/Offline/dimuon/muon_html/README_mchda.html
 Reference Runs: (station 3)
 Index		Run
 1		109303
 2		109304
 3		109305
 4		109306
 5 		109307
 6 		109308
 7		109309
 8		109310
 9		109311
 10		109312
 11		109313
 Run Type: CALIBRATION
 DA Type: LDC
 Number of events needed: 400 events for each calibration run (11)
 Input Files:  mutrkcalibvalues and config_ldc-MTRK-S3-0 in path : /afs/cern.ch/user/j/jcharvet/public/DA_validation
 Output Files: local dir (not persistent) -> MUONTRKGAINda.par   FXS -> run<#>_MCH_<ldc>_GAINS
 Trigger types used:
 */

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

/* $Id$ */

/*
 -------------------------------------------------------------------------
 2010-02-16 New version: MUONTRKGAINda.cxx,v 1.5
 -------------------------------------------------------------------------
 
 Version for MUONTRKGAINda MUON tracking
 (A. Baldisseri, J.-L. Charvet)
 
 
 Rem:  AliMUON2DMap stores all channels, even those which are not connected
 if pedMean == -1, channel not connected to a pad  
 
 
 */
extern "C" {
#include <daqDA.h>
}

#include "event.h"
#include "monitor.h"

#include <Riostream.h>
#include <stdio.h>
#include <stdlib.h>
#include <sstream>
#include <math.h> 

//AliRoot
#include "AliMUONRawStreamTrackerHP.h"
#include "AliRawReader.h"
#include "AliMUONVStore.h"
#include "AliMUON2DMap.h"
#include "AliMUONCalibParamND.h"
#include "AliMpIntPair.h"
#include "AliMpConstants.h"
#include "AliRawDataErrorLog.h"
#include "AliMUONTrackerIO.h"

//ROOT
#include "TFile.h"
#include "TSystem.h"
#include "TTree.h"
#include "TH1F.h"
#include "TString.h"
#include "TStopwatch.h"
#include "TMath.h"
#include "TTimeStamp.h"
#include "TGraphErrors.h"
#include "TF1.h"
#include "TROOT.h"
#include "TPluginManager.h"
#include "TFitter.h"
#include "TObjString.h"
#include "THashTable.h"
#include <THashList.h>
//
//AMORE
//
#ifdef ALI_AMORE
#include <AmoreDA.h>
#endif

#include "AliMUONPedestal.h"
#include "AliMUONGain.h"
#include "AliMUONErrorCounter.h"

// main routine
int main(Int_t argc, const char** argv) 
{
  Int_t status=0;
  TStopwatch timers;
  timers.Start(kTRUE); 
  
  const char* prefixDA = "MUONTRKGAINda"; // program prefix
  printf(" ######## Begin execution : %s ######## \n\n",prefixDA); 
  
  TString inputFile;
  // decode the input line
  if (argc!=2) { printf("Wrong number of arguments\n");  return -1; }
  
  inputFile = argv[1];
  
  // needed for streamer application
  gROOT->GetPluginManager()->AddHandler("TVirtualStreamerInfo",
                                        "*",
                                        "TStreamerInfo",
                                        "RIO",
                                        "TStreamerInfo()"); 
  // needed for Minuit plugin
  gROOT->GetPluginManager()->AddHandler("ROOT::Math::Minimizer",
                                        "Minuit",
                                        "TMinuitMinimizer",
                                        "Minuit",
                                        "TMinuitMinimizer(const char*)");
  Int_t skipEvents = 0;
  Int_t maxEvents  = 1000000;
  Int_t maxDateEvents  = 1000000;
  
  Int_t nDateEvents = 0;
  Int_t nGlitchErrors= 0;
  Int_t nParityErrors= 0;
  Int_t nPaddingErrors= 0;
  Int_t nTokenlostErrors= 0;
  Int_t nEventsRecovered = 0;
  Int_t nEvents = 0;
  
  TString logOutputFile;
  Char_t flatFile[256]="";
  TString shuttleFile;
  
  UInt_t runNumber   = 0;
  ofstream filcout;
  Int_t nIndex = -1; 
  
  // For DA Gain
  Int_t nEntries = daqDA_ECS_getTotalIteration(); // usually = 11 = Nb of calibration runs
  Int_t nInit=1;  // = 0 all DAC values ; = 1 DAC=0 excluded (default=1)
  Int_t nbpf1=6;  // nb of points for linear fit (default=6) 
  Int_t printLevel  = 0;  // printout (default=0, =1 =>.ped , => .peak & .param)
  Int_t plotLevel  = 1;  // plotout (default=1 => tree , =2 tree+Tgraph+fit)
  Int_t nbev=0; 
  Int_t injCharge; 
  
  // Reading current iteration
  nIndex = daqDA_ECS_getCurrentIteration();
  if(nIndex<0 || nIndex>nEntries) {printf("\n Failed: nIndex = %d\n",nIndex); return -1 ;}
  
  //Gain object
  AliMUONGain* muonGain = new AliMUONGain();
  muonGain->SetprefixDA(prefixDA);
  muonGain->SetAliRootDataFileName(); // MUONTRKGAINda_data.root
  
  UShort_t manuId;  
  UChar_t channelId;
  UShort_t charge;
  
  // DAC values stored in array vDAC (reading dbfile in DETDB)
  //   Int_t vDAC[11] = {0,200,400,800,1200,1600,2000,2500,3000,3500,4000}
  Int_t nConfig = 1; // flag to read or not configuration ascii file in detDB
  Int_t vDAC[11]; // DAC values
  Char_t dbfile[256]="";
  sprintf(dbfile,"mutrkcalibvalues");
  status=daqDA_DB_getFile(dbfile,dbfile);
  if(status) {printf(" Failed  : input file %s is missing, status = %d\n",dbfile,status); return -1; } 
  
  ifstream filein(dbfile,ios::in); Int_t k=0, kk;
  while (k<nEntries ) { filein >> kk >> vDAC[k] ; k++; }
  injCharge=vDAC[nIndex-1];
  
  filein >> nInit; // = 0 all DAC values fitted ; = 1 DAC=0 excluded (default=1)
  filein >> nbpf1; // nb of points for linear fit (default=6) 
  filein >> printLevel;  // printout (default=0, =1 =>.ped /run, =2 => .peak & .param)
  filein >> plotLevel;  // plotout (default=1 => tree , =2 tree+Tgraph+fit)
  filein >> nConfig;  //nConfig (default=1 => read config in DetDB, otherwise =0)
  filein >> nbev;  // Nb of events to read  (default = 0 => reading all events)
  if(nbev>0)maxEvents=nbev;
  
  //  printf(" *** Copy: %s from DetDB to working directory  ***      Config= %d\n",dbfile,nConfig);
  printf(" Input parameters:  nInit= %d   Nb linear pts= %d   Print level= %d   Plot Level= %d    nConfig= %d",nInit,nbpf1,printLevel,plotLevel,nConfig);
  if(nbev==0)printf("\n");
  else printf("  Nb_max evt = %d\n",maxEvents);
  
  muonGain->SetAliPrintLevel(printLevel);
  muonGain->SetAliPlotLevel(plotLevel);
  muonGain->SetconfigDA(nConfig);
  
  if(nConfig)
  {
    // Laod configuration ascii file from DetDB
    sprintf(dbfile,"config_%s",getenv("DATE_ROLE_NAME"));
    status=daqDA_DB_getFile(dbfile,dbfile);
    if(status) {printf(" Failed  : Configuration file %s is missing, status = %d\n",dbfile,status); return -1; }
    //    else printf(" *** Copy ascii config file: %s from DetDB to working directory and reading ...*** \n",dbfile);
    muonGain->LoadConfig(dbfile);  
  } 
  
  // Rawdeader, RawStreamHP
  AliRawReader* rawReader = AliRawReader::Create(inputFile.Data());
  AliMUONRawStreamTrackerHP* rawStream  = new AliMUONRawStreamTrackerHP(rawReader);    
  rawStream->DisableWarnings();
  rawStream->EnabbleErrorLogger();
  
  cout << "\n" << prefixDA << " : Reading data from file " << inputFile.Data()  << endl;
  
  while (rawReader->NextEvent())
  {
    if (nDateEvents >= maxDateEvents) break;
    if (nEvents >= maxEvents) break;
    if (nDateEvents>0 &&  nDateEvents % 100 == 0) 	
      cout<<"Cumulated:  DATE events = " << nDateEvents << "   Used events = " << nEvents << endl;
    
    // check shutdown condition 
    if (daqDA_checkShutdown()) 
      break;
    //Skip events
    while (skipEvents)
    {
      rawReader->NextEvent();
      skipEvents--;
    }
    
    Int_t eventType = rawReader->GetType();
    runNumber = rawReader->GetRunNumber();
    
    // Output log file initialisations
    if(nDateEvents==0)
    {
      sprintf(flatFile,"%s.log",prefixDA);
      logOutputFile=flatFile;
      
      filcout.open(logOutputFile.Data());
      filcout<<"//=================================================" << endl;
      filcout<<"//       " << prefixDA << " for run = " << runNumber << "  (DAC=" << injCharge << ")" << endl;
      filcout<<"//=================================================" << endl;
      filcout<<"//   * Date          : " << muonGain->GetDate()->AsString("l") << "\n" << endl;
      
      cout<<"\n ********  " << prefixDA << " for run = " << runNumber << "  (Index= " << nIndex << "/" << nEntries << "  DAC=" << injCharge << ") ********\n" << endl;
      cout<<" * Date : " << muonGain->GetDate()->AsString("l") << "\n" << endl;
    }
    
    muonGain->SetAlifilcout(&filcout);
    
    nDateEvents++;
    if (eventType != PHYSICS_EVENT)
      continue; // for the moment
    
    // First lopp over DDL's to find good events
    // Error counters per event (counters in the decoding lib are for each DDL)
    Bool_t eventIsErrorMessage = kFALSE;
    int eventGlitchErrors = 0;
    int eventParityErrors = 0;
    int eventPaddingErrors = 0;
    int eventTokenlostErrors = 0;
    rawStream->First();
    do
    {
      if (rawStream->IsErrorMessage()) eventIsErrorMessage = kTRUE;
      eventGlitchErrors += rawStream->GetGlitchErrors();
      eventParityErrors += rawStream->GetParityErrors();
      eventPaddingErrors += rawStream->GetPaddingErrors();
      eventTokenlostErrors += rawStream->GetTokenLostErrors();
    } while(rawStream->NextDDL()); 
    
    AliMUONRawStreamTrackerHP::AliBusPatch* busPatch;
    if (!eventIsErrorMessage) 
    {
      // Good events (no error) -> compute pedestal for all channels
      rawStream->First(); 
      while( (busPatch = (AliMUONRawStreamTrackerHP::AliBusPatch*) rawStream->Next())) 
	    {
	      for(int i = 0; i < busPatch->GetLength(); ++i)
        {
          busPatch->GetData(i, manuId, channelId, charge);
          muonGain->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
        }
	    }
      nEvents++;
    }
    else
    {
      // Events with errors
      if (eventParityErrors && !eventGlitchErrors&& !eventPaddingErrors)
	    {
	      // Recover parity errors -> compute pedestal for all good buspatches
	      if ( TEST_SYSTEM_ATTRIBUTE( rawReader->GetAttributes(),
                                   ATTR_ORBIT_BC )) 
        {
          filcout <<"Event recovered -> Period:"<<EVENT_ID_GET_PERIOD( rawReader->GetEventId() )
          <<" Orbit:"<<EVENT_ID_GET_ORBIT( rawReader->GetEventId() )
          <<" BunchCrossing:"<<EVENT_ID_GET_BUNCH_CROSSING( rawReader->GetEventId() )<<endl;				
        } 
	      else 
        {
          filcout <<"Event recovered -> nbInRun:"<<EVENT_ID_GET_NB_IN_RUN( rawReader->GetEventId() )
          <<" burstNb:"<<EVENT_ID_GET_BURST_NB( rawReader->GetEventId() )
          <<" nbInBurst:"<<EVENT_ID_GET_NB_IN_BURST( rawReader->GetEventId() )<<endl;
        }
	      rawStream->First();
	      while( (busPatch = (AliMUONRawStreamTrackerHP::AliBusPatch*) rawStream->Next())) 
        {
          // Check the buspatch -> if error not use it in the pedestal calculation
          int errorCount = 0;
          for(int i = 0; i < busPatch->GetLength(); ++i)
          {
            if (!busPatch->IsParityOk(i)) errorCount++;
          }
          if (!errorCount) 
          {
            // Good buspatch
            for(int i = 0; i < busPatch->GetLength(); ++i)
            {
              busPatch->GetData(i, manuId, channelId, charge);
              muonGain->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
            }
          }
          else
          {
            char bpname[256];
            AliMUONErrorCounter* errorCounter;
            // Bad buspatch -> not used (just print)
            filcout<<"bpId "<<busPatch->GetBusPatchId()<<" words "<<busPatch->GetLength()
            <<" parity errors "<<errorCount<<endl;
            // Number of events where this buspatch is missing
            sprintf(bpname,"bp%d",busPatch->GetBusPatchId());						
            if (!(errorCounter = (AliMUONErrorCounter*) (muonGain->GetErrorBuspatchTable()->FindObject(bpname))))
            {
              // New buspatch
              errorCounter = new AliMUONErrorCounter(busPatch->GetBusPatchId());
              errorCounter->SetName(bpname);
              muonGain->GetErrorBuspatchTable()->Add(errorCounter);
            }
            else
            {
              // Existing buspatch
              errorCounter->Increment();
            }	
            // errorCounter->Print();						
          } // end of if (!errorCount)
        } // end of while( (busPatch = (AliMUONRawStreamTrackerHP ...
	      nEvents++;
	      nEventsRecovered++;
	    } //end of if (eventParityErrors && !eventGlitchErrors&& !eventPaddingErrors)
      else
	    {
	      // Fatal errors reject the event
	      if ( TEST_SYSTEM_ATTRIBUTE( rawReader->GetAttributes(),
                                   ATTR_ORBIT_BC )) 
        {
          filcout <<"Event rejected -> Period:"<<EVENT_ID_GET_PERIOD( rawReader->GetEventId() )
          <<" Orbit:"<<EVENT_ID_GET_ORBIT( rawReader->GetEventId() )
          <<" BunchCrossing:"<<EVENT_ID_GET_BUNCH_CROSSING( rawReader->GetEventId() )<<endl;				
        } 
	      else 
        {
          filcout <<"Event rejected -> nbInRun:"<<EVENT_ID_GET_NB_IN_RUN( rawReader->GetEventId() )
          <<" burstNb:"<<EVENT_ID_GET_BURST_NB( rawReader->GetEventId() )
          <<" nbInBurst:"<<EVENT_ID_GET_NB_IN_BURST( rawReader->GetEventId() )<<endl;
          
        }
	    } // end of if (!rawStream->GetGlitchErrors() && !rawStream->GetPaddingErrors() ...
      filcout<<"Number of errors : Glitch "<<eventGlitchErrors
      <<" Parity "<<eventParityErrors
      <<" Padding "<<eventPaddingErrors
      <<" Token lost "<<eventTokenlostErrors<<endl;
      filcout<<endl;			
    } // end of if (!rawStream->IsErrorMessage())
    
    if (eventGlitchErrors)  nGlitchErrors++;
    if (eventParityErrors)  nParityErrors++;
    if (eventPaddingErrors) nPaddingErrors++;
    if (eventTokenlostErrors) nTokenlostErrors++;

  } // while (rawReader->NextEvent())
  delete rawReader;
  delete rawStream;
  
  // process and store mean peak values in .root file
  sprintf(flatFile,"%s.par",prefixDA);
  if(shuttleFile.IsNull())shuttleFile=flatFile;
  injCharge=vDAC[nIndex-1];
  muonGain->SetAliIndex(nIndex); // fIndex 
  muonGain->SetAliInjCharge(injCharge);
  muonGain->SetAliNEvents(nEvents);
  muonGain->SetAliRunNumber(runNumber);
  muonGain->MakePedStoreForGain(shuttleFile);
  
  
  // writing some counters
  cout << endl;
  cout << prefixDA << " : Nb of DATE events           = " << nDateEvents    << endl;
  cout << prefixDA << " : Nb of Glitch errors         = "   << nGlitchErrors  << endl;
  cout << prefixDA << " : Nb of Parity errors         = "   << nParityErrors  << endl;
  cout << prefixDA << " : Nb of Padding errors        = "   << nPaddingErrors << endl;		
  cout << prefixDA << " : Nb of Token lost errors     = "   << nTokenlostErrors << endl;
  cout << prefixDA << " : Nb of events recovered      = "   << nEventsRecovered<< endl;
  cout << prefixDA << " : Nb of events without errors = "   << nEvents-nEventsRecovered<< endl;
  cout << prefixDA << " : Nb of events used           = "   << nEvents        << endl;
  
  filcout << endl;
  filcout << prefixDA << " : Nb of DATE events           = " << nDateEvents    << endl;
  filcout << prefixDA << " : Nb of Glitch errors         = "   << nGlitchErrors << endl;
  filcout << prefixDA << " : Nb of Parity errors         = "   << nParityErrors << endl;
  filcout << prefixDA << " : Nb of Padding errors        = "   << nPaddingErrors << endl;
  filcout << prefixDA << " : Nb of Token lost errors     = "   << nTokenlostErrors << endl;
  filcout << prefixDA << " : Nb of events recovered      = "   << nEventsRecovered<< endl;	
  filcout << prefixDA << " : Nb of events without errors = "   << nEvents-nEventsRecovered<< endl;
  filcout << prefixDA << " : Nb of events used           = "   << nEvents        << endl;
  
  // Computing gain 
  if(nIndex==nEntries)
  {
    muonGain->SetAliInit(nInit); // fnInit
    muonGain->SetAliEntries(nEntries); // fnEntries
    muonGain->SetAliNbpf1(nbpf1); // fnbpf1
    muonGain->MakeGainStore(shuttleFile);
#ifdef ALI_AMORE  
    std::ifstream in(shuttleFile.Data());
    ostringstream stringout;
    char line[1024];
    while ( in.getline(line,1024) )
      stringout << line << "\n";  
    in.close();
	  
    amore::da::AmoreDA amoreDA(amore::da::AmoreDA::kSender);
    TObjString gaindata(stringout.str().c_str());
    status = amoreDA.Send("Gains",&gaindata);
    if ( status )
      cout << "Warning: Failed to write Pedestals in the AMORE database : " << status << endl;
    else 
      cout << "amoreDA.Send(Gains) ok" << endl;  
#else
    cout << "Warning: MCH DA not compiled with AMORE support" << endl;
#endif
  }
  
  // ouput files
  filcout << endl;
  filcout << prefixDA << " : Root data file         : " << muonGain->GetRootDataFileName() << endl;
  filcout << prefixDA << " : Output logfile         : " << logOutputFile  << endl;
  filcout << prefixDA << " : Gain Histo file        : " << muonGain->GetHistoFileName() << endl;
  filcout << prefixDA << " : Gain file (to SHUTTLE) : " << shuttleFile << endl;
  
  //	 Copying files to local DB folder defined by DAQ_DETDB_LOCAL
  Char_t *dir;
  dir= getenv("DAQ_DETDB_LOCAL");
  unsigned int nLastVersions = 50;
  printf("\n ***  Local DataBase: %s  (Max= %d) ***\n",dir,nLastVersions);
  status = daqDA_localDB_storeFile(logOutputFile.Data(),nLastVersions);
  if(status)printf(" Store file : %s   status = %d\n",logOutputFile.Data(),status);
  if(nIndex==nEntries)
  {
    status = daqDA_localDB_storeFile(muonGain->GetRootDataFileName(),nLastVersions);
    if(status)printf(" Store file : %s   status = %d\n",muonGain->GetRootDataFileName(),status);
    status = daqDA_localDB_storeFile(muonGain->GetHistoFileName(),nLastVersions);
    if(status)printf(" Store file : %s   status = %d\n",muonGain->GetHistoFileName(),status);
    status = daqDA_localDB_storeFile(shuttleFile.Data(),nLastVersions);
    if(status)printf(" Store file : %s   status = %d\n",shuttleFile.Data(),status);
  }      
  
  
  // ouput files
  cout << endl;
  cout << prefixDA << " : Root data file         : " << muonGain->GetRootDataFileName() << endl;
  cout << prefixDA << " : Output logfile         : " << logOutputFile  << endl;
  cout << prefixDA << " : Gain Histo file        : " << muonGain->GetHistoFileName() << endl;
  cout << prefixDA << " : Gain file (to SHUTTLE) : " << shuttleFile << endl;   
  
  filcout.close();
  
  // Transferring to calibration file to  FES
  // be sure that env variable DAQDALIB_PATH is set in script file
  //       gSystem->Setenv("DAQDALIB_PATH", "$DATE_SITE/infoLogger");
  printf("\n *****  STORE calibration FILE to FES ****** \n");
  status = daqDA_FES_storeFile(shuttleFile.Data(),"GAINS");
  if (status) { printf(" Failed to export file : %s , status = %d\n",shuttleFile.Data(),status); return -1; }
  //  else printf(" %s successfully exported to FES  \n",shuttleFile.Data());
  
  printf("\n ######## End execution : %s ######## \n",prefixDA); 
  timers.Stop();
  printf("\nExecution time : R:%7.2fs C:%7.2fs\n", timers.RealTime(), timers.CpuTime());
  return status;
}
Commit	Line	Data
dc928fbf	1	/*
f3cfa63e	2	Contact: Jean-Luc Charvet <jean-luc.charvet@cern.ch>
f3cfa63e	3	Link: http://aliceinfo.cern.ch/static/Offline/dimuon/muon_html/README_mchda.html
18ec51a0	4	Reference Runs: (station 3)
	5	Index Run
	6	1 109303
	7	2 109304
	8	3 109305
	9	4 109306
	10	5 109307
	11	6 109308
	12	7 109309
	13	8 109310
	14	9 109311
	15	10 109312
	16	11 109313
1dd09aa3	17	Run Type: CALIBRATION
1dd09aa3	18	DA Type: LDC
f3cfa63e	19	Number of events needed: 400 events for each calibration run (11)
18ec51a0	20	Input Files: mutrkcalibvalues and config_ldc-MTRK-S3-0 in path : /afs/cern.ch/user/j/jcharvet/public/DA_validation
f3cfa63e	21	Output Files: local dir (not persistent) -> MUONTRKGAINda.par FXS -> run<#>_MCH_<ldc>_GAINS
1dd09aa3	22	Trigger types used:
f3cfa63e	23	*/
dc928fbf	24
dc928fbf	25	/**************************************************************************
f3cfa63e	26	* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
	27	* *
	28	* Author: The ALICE Off-line Project. *
	29	* Contributors are mentioned in the code where appropriate. *
	30	* *
	31	* Permission to use, copy, modify and distribute this software and its *
	32	* documentation strictly for non-commercial purposes is hereby granted *
	33	* without fee, provided that the above copyright notice appears in all *
	34	* copies and that both the copyright notice and this permission notice *
	35	* appear in the supporting documentation. The authors make no claims *
	36	* about the suitability of this software for any purpose. It is *
	37	* provided "as is" without express or implied warranty. *
	38	**************************************************************************/
dc928fbf	39
	40	/* $Id$ */
	41
	42	/*
1dd09aa3	43	-------------------------------------------------------------------------
b9c33bca	44	2010-02-16 New version: MUONTRKGAINda.cxx,v 1.5
1dd09aa3	45	-------------------------------------------------------------------------
f3cfa63e	46
1dd09aa3	47	Version for MUONTRKGAINda MUON tracking
1dd09aa3	48	(A. Baldisseri, J.-L. Charvet)
f3cfa63e	49
f3cfa63e	50
1dd09aa3	51	Rem: AliMUON2DMap stores all channels, even those which are not connected
1dd09aa3	52	if pedMean == -1, channel not connected to a pad
f3cfa63e	53
	54
	55	*/
dc928fbf	56	extern "C" {
	57	#include <daqDA.h>
	58	}
	59
	60	#include "event.h"
	61	#include "monitor.h"
	62
	63	#include <Riostream.h>
	64	#include <stdio.h>
	65	#include <stdlib.h>
	66	#include <sstream>
	67	#include <math.h>
	68
	69	//AliRoot
	70	#include "AliMUONRawStreamTrackerHP.h"
	71	#include "AliRawReader.h"
	72	#include "AliMUONVStore.h"
	73	#include "AliMUON2DMap.h"
	74	#include "AliMUONCalibParamND.h"
	75	#include "AliMpIntPair.h"
	76	#include "AliMpConstants.h"
	77	#include "AliRawDataErrorLog.h"
	78	#include "AliMUONTrackerIO.h"
	79
	80	//ROOT
	81	#include "TFile.h"
	82	#include "TSystem.h"
	83	#include "TTree.h"
	84	#include "TH1F.h"
	85	#include "TString.h"
	86	#include "TStopwatch.h"
	87	#include "TMath.h"
	88	#include "TTimeStamp.h"
	89	#include "TGraphErrors.h"
	90	#include "TF1.h"
	91	#include "TROOT.h"
	92	#include "TPluginManager.h"
	93	#include "TFitter.h"
	94	#include "TObjString.h"
	95	#include "THashTable.h"
	96	#include <THashList.h>
	97	//
	98	//AMORE
	99	//
	100	#ifdef ALI_AMORE
	101	#include <AmoreDA.h>
	102	#endif
	103
	104	#include "AliMUONPedestal.h"
	105	#include "AliMUONGain.h"
	106	#include "AliMUONErrorCounter.h"
	107
	108	// main routine
f3cfa63e	109	int main(Int_t argc, const char** argv)
dc928fbf	110	{
f3cfa63e	111	Int_t status=0;
	112	TStopwatch timers;
	113	timers.Start(kTRUE);
	114
	115	const char* prefixDA = "MUONTRKGAINda"; // program prefix
	116	printf(" ######## Begin execution : %s ######## \n\n",prefixDA);
	117
	118	TString inputFile;
	119	// decode the input line
	120	if (argc!=2) { printf("Wrong number of arguments\n"); return -1; }
	121
	122	inputFile = argv[1];
	123
	124	// needed for streamer application
	125	gROOT->GetPluginManager()->AddHandler("TVirtualStreamerInfo",
	126	"*",
	127	"TStreamerInfo",
	128	"RIO",
	129	"TStreamerInfo()");
	130	// needed for Minuit plugin
	131	gROOT->GetPluginManager()->AddHandler("ROOT::Math::Minimizer",
	132	"Minuit",
	133	"TMinuitMinimizer",
	134	"Minuit",
	135	"TMinuitMinimizer(const char*)");
	136	Int_t skipEvents = 0;
	137	Int_t maxEvents = 1000000;
	138	Int_t maxDateEvents = 1000000;
	139
	140	Int_t nDateEvents = 0;
	141	Int_t nGlitchErrors= 0;
	142	Int_t nParityErrors= 0;
	143	Int_t nPaddingErrors= 0;
b9c33bca	144	Int_t nTokenlostErrors= 0;
f3cfa63e	145	Int_t nEventsRecovered = 0;
	146	Int_t nEvents = 0;
	147
	148	TString logOutputFile;
	149	Char_t flatFile[256]="";
	150	TString shuttleFile;
	151
	152	UInt_t runNumber = 0;
	153	ofstream filcout;
	154	Int_t nIndex = -1;
	155
	156	// For DA Gain
	157	Int_t nEntries = daqDA_ECS_getTotalIteration(); // usually = 11 = Nb of calibration runs
	158	Int_t nInit=1; // = 0 all DAC values ; = 1 DAC=0 excluded (default=1)
	159	Int_t nbpf1=6; // nb of points for linear fit (default=6)
	160	Int_t printLevel = 0; // printout (default=0, =1 =>.ped , => .peak & .param)
	161	Int_t plotLevel = 1; // plotout (default=1 => tree , =2 tree+Tgraph+fit)
	162	Int_t nbev=0;
	163	Int_t injCharge;
	164
	165	// Reading current iteration
	166	nIndex = daqDA_ECS_getCurrentIteration();
	167	if(nIndex<0 \|\| nIndex>nEntries) {printf("\n Failed: nIndex = %d\n",nIndex); return -1 ;}
	168
	169	//Gain object
	170	AliMUONGain* muonGain = new AliMUONGain();
	171	muonGain->SetprefixDA(prefixDA);
	172	muonGain->SetAliRootDataFileName(); // MUONTRKGAINda_data.root
	173
	174	UShort_t manuId;
	175	UChar_t channelId;
	176	UShort_t charge;
	177
	178	// DAC values stored in array vDAC (reading dbfile in DETDB)
	179	// Int_t vDAC[11] = {0,200,400,800,1200,1600,2000,2500,3000,3500,4000}
	180	Int_t nConfig = 1; // flag to read or not configuration ascii file in detDB
	181	Int_t vDAC[11]; // DAC values
	182	Char_t dbfile[256]="";
	183	sprintf(dbfile,"mutrkcalibvalues");
	184	status=daqDA_DB_getFile(dbfile,dbfile);
	185	if(status) {printf(" Failed : input file %s is missing, status = %d\n",dbfile,status); return -1; }
	186
	187	ifstream filein(dbfile,ios::in); Int_t k=0, kk;
	188	while (k<nEntries ) { filein >> kk >> vDAC[k] ; k++; }
	189	injCharge=vDAC[nIndex-1];
	190
	191	filein >> nInit; // = 0 all DAC values fitted ; = 1 DAC=0 excluded (default=1)
	192	filein >> nbpf1; // nb of points for linear fit (default=6)
	193	filein >> printLevel; // printout (default=0, =1 =>.ped /run, =2 => .peak & .param)
	194	filein >> plotLevel; // plotout (default=1 => tree , =2 tree+Tgraph+fit)
	195	filein >> nConfig; //nConfig (default=1 => read config in DetDB, otherwise =0)
	196	filein >> nbev; // Nb of events to read (default = 0 => reading all events)
	197	if(nbev>0)maxEvents=nbev;
	198
b9c33bca	199	// printf(" * Copy: %s from DetDB to working directory * Config= %d\n",dbfile,nConfig);
b9c33bca	200	printf(" Input parameters: nInit= %d Nb linear pts= %d Print level= %d Plot Level= %d nConfig= %d",nInit,nbpf1,printLevel,plotLevel,nConfig);
f3cfa63e	201	if(nbev==0)printf("\n");
	202	else printf(" Nb_max evt = %d\n",maxEvents);
	203
	204	muonGain->SetAliPrintLevel(printLevel);
	205	muonGain->SetAliPlotLevel(plotLevel);
	206	muonGain->SetconfigDA(nConfig);
	207
	208	if(nConfig)
	209	{
	210	// Laod configuration ascii file from DetDB
	211	sprintf(dbfile,"config_%s",getenv("DATE_ROLE_NAME"));
	212	status=daqDA_DB_getFile(dbfile,dbfile);
	213	if(status) {printf(" Failed : Configuration file %s is missing, status = %d\n",dbfile,status); return -1; }
b9c33bca	214	// else printf(" * Copy ascii config file: %s from DetDB to working directory and reading ...* \n",dbfile);
f3cfa63e	215	muonGain->LoadConfig(dbfile);
	216	}
	217
	218	// Rawdeader, RawStreamHP
	219	AliRawReader* rawReader = AliRawReader::Create(inputFile.Data());
	220	AliMUONRawStreamTrackerHP* rawStream = new AliMUONRawStreamTrackerHP(rawReader);
	221	rawStream->DisableWarnings();
	222	rawStream->EnabbleErrorLogger();
	223
	224	cout << "\n" << prefixDA << " : Reading data from file " << inputFile.Data() << endl;
	225
	226	while (rawReader->NextEvent())
	227	{
	228	if (nDateEvents >= maxDateEvents) break;
	229	if (nEvents >= maxEvents) break;
	230	if (nDateEvents>0 && nDateEvents % 100 == 0)
	231	cout<<"Cumulated: DATE events = " << nDateEvents << " Used events = " << nEvents << endl;
	232
	233	// check shutdown condition
	234	if (daqDA_checkShutdown())
	235	break;
	236	//Skip events
	237	while (skipEvents)
	238	{
	239	rawReader->NextEvent();
	240	skipEvents--;
	241	}
	242
	243	Int_t eventType = rawReader->GetType();
	244	runNumber = rawReader->GetRunNumber();
	245
	246	// Output log file initialisations
	247	if(nDateEvents==0)
	248	{
	249	sprintf(flatFile,"%s.log",prefixDA);
	250	logOutputFile=flatFile;
	251
	252	filcout.open(logOutputFile.Data());
	253	filcout<<"//=================================================" << endl;
	254	filcout<<"// " << prefixDA << " for run = " << runNumber << " (DAC=" << injCharge << ")" << endl;
	255	filcout<<"//=================================================" << endl;
	256	filcout<<"// * Date : " << muonGain->GetDate()->AsString("l") << "\n" << endl;
	257
	258	cout<<"\n ****** " << prefixDA << " for run = " << runNumber << " (Index= " << nIndex << "/" << nEntries << " DAC=" << injCharge << ") ******\n" << endl;
	259	cout<<" * Date : " << muonGain->GetDate()->AsString("l") << "\n" << endl;
	260	}
	261
	262	muonGain->SetAlifilcout(&filcout);
	263
	264	nDateEvents++;
	265	if (eventType != PHYSICS_EVENT)
	266	continue; // for the moment
	267
	268	// First lopp over DDL's to find good events
	269	// Error counters per event (counters in the decoding lib are for each DDL)
	270	Bool_t eventIsErrorMessage = kFALSE;
	271	int eventGlitchErrors = 0;
	272	int eventParityErrors = 0;
	273	int eventPaddingErrors = 0;
b9c33bca	274	int eventTokenlostErrors = 0;
f3cfa63e	275	rawStream->First();
	276	do
	277	{
	278	if (rawStream->IsErrorMessage()) eventIsErrorMessage = kTRUE;
	279	eventGlitchErrors += rawStream->GetGlitchErrors();
	280	eventParityErrors += rawStream->GetParityErrors();
	281	eventPaddingErrors += rawStream->GetPaddingErrors();
b9c33bca	282	eventTokenlostErrors += rawStream->GetTokenLostErrors();
f3cfa63e	283	} while(rawStream->NextDDL());
	284
	285	AliMUONRawStreamTrackerHP::AliBusPatch* busPatch;
	286	if (!eventIsErrorMessage)
	287	{
	288	// Good events (no error) -> compute pedestal for all channels
	289	rawStream->First();
	290	while( (busPatch = (AliMUONRawStreamTrackerHP::AliBusPatch*) rawStream->Next()))
dc928fbf	291	{
f3cfa63e	292	for(int i = 0; i < busPatch->GetLength(); ++i)
	293	{
	294	busPatch->GetData(i, manuId, channelId, charge);
	295	muonGain->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
	296	}
dc928fbf	297	}
f3cfa63e	298	nEvents++;
	299	}
	300	else
	301	{
	302	// Events with errors
	303	if (eventParityErrors && !eventGlitchErrors&& !eventPaddingErrors)
dc928fbf	304	{
f3cfa63e	305	// Recover parity errors -> compute pedestal for all good buspatches
	306	if ( TEST_SYSTEM_ATTRIBUTE( rawReader->GetAttributes(),
	307	ATTR_ORBIT_BC ))
	308	{
	309	filcout <<"Event recovered -> Period:"<<EVENT_ID_GET_PERIOD( rawReader->GetEventId() )
	310	<<" Orbit:"<<EVENT_ID_GET_ORBIT( rawReader->GetEventId() )
	311	<<" BunchCrossing:"<<EVENT_ID_GET_BUNCH_CROSSING( rawReader->GetEventId() )<<endl;
	312	}
	313	else
	314	{
	315	filcout <<"Event recovered -> nbInRun:"<<EVENT_ID_GET_NB_IN_RUN( rawReader->GetEventId() )
	316	<<" burstNb:"<<EVENT_ID_GET_BURST_NB( rawReader->GetEventId() )
	317	<<" nbInBurst:"<<EVENT_ID_GET_NB_IN_BURST( rawReader->GetEventId() )<<endl;
	318	}
	319	rawStream->First();
dc928fbf	320	while( (busPatch = (AliMUONRawStreamTrackerHP::AliBusPatch*) rawStream->Next()))
f3cfa63e	321	{
	322	// Check the buspatch -> if error not use it in the pedestal calculation
	323	int errorCount = 0;
	324	for(int i = 0; i < busPatch->GetLength(); ++i)
	325	{
	326	if (!busPatch->IsParityOk(i)) errorCount++;
	327	}
	328	if (!errorCount)
	329	{
	330	// Good buspatch
	331	for(int i = 0; i < busPatch->GetLength(); ++i)
	332	{
	333	busPatch->GetData(i, manuId, channelId, charge);
	334	muonGain->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
	335	}
	336	}
	337	else
	338	{
	339	char bpname[256];
	340	AliMUONErrorCounter* errorCounter;
	341	// Bad buspatch -> not used (just print)
	342	filcout<<"bpId "<<busPatch->GetBusPatchId()<<" words "<<busPatch->GetLength()
	343	<<" parity errors "<<errorCount<<endl;
	344	// Number of events where this buspatch is missing
	345	sprintf(bpname,"bp%d",busPatch->GetBusPatchId());
	346	if (!(errorCounter = (AliMUONErrorCounter*) (muonGain->GetErrorBuspatchTable()->FindObject(bpname))))
	347	{
	348	// New buspatch
	349	errorCounter = new AliMUONErrorCounter(busPatch->GetBusPatchId());
	350	errorCounter->SetName(bpname);
	351	muonGain->GetErrorBuspatchTable()->Add(errorCounter);
	352	}
	353	else
	354	{
	355	// Existing buspatch
	356	errorCounter->Increment();
	357	}
	358	// errorCounter->Print();
	359	} // end of if (!errorCount)
	360	} // end of while( (busPatch = (AliMUONRawStreamTrackerHP ...
dc928fbf	361	nEvents++;
f3cfa63e	362	nEventsRecovered++;
	363	} //end of if (eventParityErrors && !eventGlitchErrors&& !eventPaddingErrors)
	364	else
dc928fbf	365	{
f3cfa63e	366	// Fatal errors reject the event
	367	if ( TEST_SYSTEM_ATTRIBUTE( rawReader->GetAttributes(),
	368	ATTR_ORBIT_BC ))
	369	{
	370	filcout <<"Event rejected -> Period:"<<EVENT_ID_GET_PERIOD( rawReader->GetEventId() )
	371	<<" Orbit:"<<EVENT_ID_GET_ORBIT( rawReader->GetEventId() )
	372	<<" BunchCrossing:"<<EVENT_ID_GET_BUNCH_CROSSING( rawReader->GetEventId() )<<endl;
	373	}
	374	else
	375	{
	376	filcout <<"Event rejected -> nbInRun:"<<EVENT_ID_GET_NB_IN_RUN( rawReader->GetEventId() )
	377	<<" burstNb:"<<EVENT_ID_GET_BURST_NB( rawReader->GetEventId() )
	378	<<" nbInBurst:"<<EVENT_ID_GET_NB_IN_BURST( rawReader->GetEventId() )<<endl;
	379
	380	}
	381	} // end of if (!rawStream->GetGlitchErrors() && !rawStream->GetPaddingErrors() ...
	382	filcout<<"Number of errors : Glitch "<<eventGlitchErrors
	383	<<" Parity "<<eventParityErrors
b9c33bca	384	<<" Padding "<<eventPaddingErrors
b9c33bca	385	<<" Token lost "<<eventTokenlostErrors<<endl;
f3cfa63e	386	filcout<<endl;
	387	} // end of if (!rawStream->IsErrorMessage())
	388
	389	if (eventGlitchErrors) nGlitchErrors++;
	390	if (eventParityErrors) nParityErrors++;
	391	if (eventPaddingErrors) nPaddingErrors++;
b9c33bca	392	if (eventTokenlostErrors) nTokenlostErrors++;
b9c33bca	393
f3cfa63e	394	} // while (rawReader->NextEvent())
	395	delete rawReader;
	396	delete rawStream;
	397
	398	// process and store mean peak values in .root file
	399	sprintf(flatFile,"%s.par",prefixDA);
	400	if(shuttleFile.IsNull())shuttleFile=flatFile;
	401	injCharge=vDAC[nIndex-1];
	402	muonGain->SetAliIndex(nIndex); // fIndex
	403	muonGain->SetAliInjCharge(injCharge);
	404	muonGain->SetAliNEvents(nEvents);
	405	muonGain->SetAliRunNumber(runNumber);
	406	muonGain->MakePedStoreForGain(shuttleFile);
	407
	408
	409	// writing some counters
	410	cout << endl;
	411	cout << prefixDA << " : Nb of DATE events = " << nDateEvents << endl;
	412	cout << prefixDA << " : Nb of Glitch errors = " << nGlitchErrors << endl;
	413	cout << prefixDA << " : Nb of Parity errors = " << nParityErrors << endl;
	414	cout << prefixDA << " : Nb of Padding errors = " << nPaddingErrors << endl;
b9c33bca	415	cout << prefixDA << " : Nb of Token lost errors = " << nTokenlostErrors << endl;
f3cfa63e	416	cout << prefixDA << " : Nb of events recovered = " << nEventsRecovered<< endl;
	417	cout << prefixDA << " : Nb of events without errors = " << nEvents-nEventsRecovered<< endl;
	418	cout << prefixDA << " : Nb of events used = " << nEvents << endl;
	419
	420	filcout << endl;
	421	filcout << prefixDA << " : Nb of DATE events = " << nDateEvents << endl;
	422	filcout << prefixDA << " : Nb of Glitch errors = " << nGlitchErrors << endl;
	423	filcout << prefixDA << " : Nb of Parity errors = " << nParityErrors << endl;
	424	filcout << prefixDA << " : Nb of Padding errors = " << nPaddingErrors << endl;
b9c33bca	425	filcout << prefixDA << " : Nb of Token lost errors = " << nTokenlostErrors << endl;
f3cfa63e	426	filcout << prefixDA << " : Nb of events recovered = " << nEventsRecovered<< endl;
	427	filcout << prefixDA << " : Nb of events without errors = " << nEvents-nEventsRecovered<< endl;
	428	filcout << prefixDA << " : Nb of events used = " << nEvents << endl;
	429
	430	// Computing gain
	431	if(nIndex==nEntries)
	432	{
	433	muonGain->SetAliInit(nInit); // fnInit
	434	muonGain->SetAliEntries(nEntries); // fnEntries
	435	muonGain->SetAliNbpf1(nbpf1); // fnbpf1
	436	muonGain->MakeGainStore(shuttleFile);
dbbb2c64	437	#ifdef ALI_AMORE
f3cfa63e	438	std::ifstream in(shuttleFile.Data());
	439	ostringstream stringout;
	440	char line[1024];
	441	while ( in.getline(line,1024) )
	442	stringout << line << "\n";
	443	in.close();
dbbb2c64	444
f3cfa63e	445	amore::da::AmoreDA amoreDA(amore::da::AmoreDA::kSender);
	446	TObjString gaindata(stringout.str().c_str());
	447	status = amoreDA.Send("Gains",&gaindata);
	448	if ( status )
	449	cout << "Warning: Failed to write Pedestals in the AMORE database : " << status << endl;
	450	else
	451	cout << "amoreDA.Send(Gains) ok" << endl;
dbbb2c64	452	#else
f3cfa63e	453	cout << "Warning: MCH DA not compiled with AMORE support" << endl;
dbbb2c64	454	#endif
f3cfa63e	455	}
	456
	457	// ouput files
	458	filcout << endl;
	459	filcout << prefixDA << " : Root data file : " << muonGain->GetRootDataFileName() << endl;
	460	filcout << prefixDA << " : Output logfile : " << logOutputFile << endl;
	461	filcout << prefixDA << " : Gain Histo file : " << muonGain->GetHistoFileName() << endl;
	462	filcout << prefixDA << " : Gain file (to SHUTTLE) : " << shuttleFile << endl;
	463
	464	// Copying files to local DB folder defined by DAQ_DETDB_LOCAL
	465	Char_t *dir;
	466	dir= getenv("DAQ_DETDB_LOCAL");
b9c33bca	467	unsigned int nLastVersions = 50;
f3cfa63e	468	printf("\n * Local DataBase: %s (Max= %d) *\n",dir,nLastVersions);
	469	status = daqDA_localDB_storeFile(logOutputFile.Data(),nLastVersions);
	470	if(status)printf(" Store file : %s status = %d\n",logOutputFile.Data(),status);
	471	if(nIndex==nEntries)
	472	{
	473	status = daqDA_localDB_storeFile(muonGain->GetRootDataFileName(),nLastVersions);
	474	if(status)printf(" Store file : %s status = %d\n",muonGain->GetRootDataFileName(),status);
	475	status = daqDA_localDB_storeFile(muonGain->GetHistoFileName(),nLastVersions);
	476	if(status)printf(" Store file : %s status = %d\n",muonGain->GetHistoFileName(),status);
	477	status = daqDA_localDB_storeFile(shuttleFile.Data(),nLastVersions);
	478	if(status)printf(" Store file : %s status = %d\n",shuttleFile.Data(),status);
	479	}
	480
	481
	482	// ouput files
dc928fbf	483	cout << endl;
	484	cout << prefixDA << " : Root data file : " << muonGain->GetRootDataFileName() << endl;
	485	cout << prefixDA << " : Output logfile : " << logOutputFile << endl;
	486	cout << prefixDA << " : Gain Histo file : " << muonGain->GetHistoFileName() << endl;
	487	cout << prefixDA << " : Gain file (to SHUTTLE) : " << shuttleFile << endl;
f3cfa63e	488
	489	filcout.close();
	490
b9c33bca	491	// Transferring to calibration file to FES
dc928fbf	492	// be sure that env variable DAQDALIB_PATH is set in script file
dc928fbf	493	// gSystem->Setenv("DAQDALIB_PATH", "$DATE_SITE/infoLogger");
b9c33bca	494	printf("\n *** STORE calibration FILE to FES **** \n");
dc928fbf	495	status = daqDA_FES_storeFile(shuttleFile.Data(),"GAINS");
f3cfa63e	496	if (status) { printf(" Failed to export file : %s , status = %d\n",shuttleFile.Data(),status); return -1; }
b9c33bca	497	// else printf(" %s successfully exported to FES \n",shuttleFile.Data());
f3cfa63e	498
f3cfa63e	499	printf("\n ######## End execution : %s ######## \n",prefixDA);
dc928fbf	500	timers.Stop();
	501	printf("\nExecution time : R:%7.2fs C:%7.2fs\n", timers.RealTime(), timers.CpuTime());
	502	return status;
5431405e	503	}
5431405e	504