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

/*
  Contact: Jean-Luc Charvet <jean-luc.charvet@cern.ch>
  Link: http://aliceinfo.cern.ch/static/Offline/dimuon/muon_html/README_mchda.html
  Reference Run: 104540
  Run Type: PEDESTAL
  DA Type: LDC
  Number of events needed: 400 events for pedestal run
  Input Files: /alice/cern.ch/user/j/jcharvet/mutrkpedvalues and /alice/cern.ch/user/j/jcharvet/config_ldc-MTRK-S0-0 
  Output Files: local dir (not persistent) -> MUONTRKPEDda.ped  FXS -> run<#>_MCH_<ldc>_PEDESTALS
  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-01-13 New version: MUONTRKPEDda.cxx,v 1.5
	-------------------------------------------------------------------------

	Version for MUONTRKPEDda 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 "AliMUONErrorCounter.h"


// main routine
int main(Int_t argc, const char **argv) 
{
  Int_t status=0;
  TStopwatch timers;
  timers.Start(kTRUE); 

  const char* prefixDA = "MUONTRKPEDda"; // program prefix
  printf(" ######## Begin execution : %s ######## \n\n",prefixDA); 

  // 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*)");
//   cout << argv[0];
 
  Int_t skipEvents = 0;
  Int_t maxEvents  = 1000000;
  Int_t maxDateEvents  = 1000000;
  TString inputFile;

  Int_t  nDateEvents = 0;
  Int_t nGlitchErrors= 0;
  Int_t nParityErrors= 0;
  Int_t nPaddingErrors= 0;
  Int_t recoverParityErrors = 1;

  TString logOutputFile;

  Char_t flatFile[256]="";
  TString shuttleFile;

  Int_t nEventsRecovered = 0;
  Int_t nEvents = 0;
  UInt_t runNumber   = 0;
  Int_t nConfig = 1, writeConfig=0; 
  ofstream filcout;

  // decode the input line
  for (Int_t i = 1; i < argc; i++) // argument 0 is the executable name
    {
      const char* arg = argv[i];

      arg = argv[i];
      if (arg[0] != '-') 
	{
	  // If only one argument and no "-" => DA calling from ECS
	  if (argc == 2)
	    {
        inputFile=argv[i];
	    }
	  continue;
	}
      switch (arg[1])
	{
	case 'f' : 
	  i++;
      inputFile=argv[i];
	  nConfig=0;
	  break;
	case 'a' : 
	  i++;
	  shuttleFile = argv[i];
	  break;
	case 's' :
	  i++; 
	  skipEvents=atoi(argv[i]);
	  break;
	case 'm' :
	  i++; 
	  sscanf(argv[i],"%d",&maxDateEvents);
	  break;
	case 'n' :
	  i++; 
	  sscanf(argv[i],"%d",&maxEvents);
	  break;
	case 'h' :
	  i++;
	  printf("\n******************* %s usage **********************",argv[0]);
	  printf("\nOnline (called from ECS) : %s <raw data file> (no inline options)\n",argv[0]);
	  printf("\n%s can be used locally only with options (without DiMuon configuration file)",argv[0]);
	  printf("\n%s -options, the available options are :",argv[0]);
	  printf("\n-h help                    (this screen)");
	  printf("\n");
	  printf("\n Input");
	  printf("\n-f <raw data file>         (default = %s)",inputFile.Data()); 
	  printf("\n");
	  printf("\n Output");
	  printf("\n-a <Flat ASCII file>       (default = %s)",shuttleFile.Data()); 
	  printf("\n");
	  printf("\n Options");
	  printf("\n-m <max date events>       (default = %d)",maxDateEvents);
	  printf("\n-s <skip events>           (default = %d)",skipEvents);
	  printf("\n-n <max events>            (default = %d)",maxEvents);

	  printf("\n\n");
	  exit(-1);
	default :
	  printf("%s : bad argument %s (please check %s -h)\n",argv[0],argv[i],argv[0]);
	  argc = 2; exit(-1); // exit if error
	} // end of switch  
    } // end of for i  

  // decoding the events

  UShort_t manuId;  
  UChar_t channelId;
  UShort_t charge;

  //Pedestal object
  AliMUONPedestal* muonPedestal = new AliMUONPedestal();
  muonPedestal->SetprefixDA(prefixDA);

  Char_t dbfile[256]="";
  // nConfig=1 : Reading configuration (or not) status via "mutrkpedvalues" file located in DetDB
  if(nConfig)
    { 
      sprintf(dbfile,"mutrkpedvalues");
      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);
      filein >> nConfig;
      filein >> writeConfig; // default=0, if 1 : current configuration file written in the Det.DataBase at the end of the DA
      printf(" *** Copy: %s from DetDB to working directory  ***  Config= %d   writeConfig=%d\n",dbfile,nConfig,writeConfig);
    }
  else  printf(" ***  Config= %d: no configuration ascii file is used \n",nConfig); 
  muonPedestal->SetconfigDA(nConfig);

  // nConfig=1: configuration ascii file read from DetDB
  if(nConfig)
    {
      // MuonTrk Configuration ascii file (initCROCUS.dat -> ascii file = config_$DATE_ROLE_NAME)
      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);
      muonPedestal->LoadConfig(dbfile);  
    } 

  // Rawdeader, RawStreamHP
  AliRawReader* rawReader = AliRawReader::Create(inputFile);
  AliMUONRawStreamTrackerHP* rawStream  = new AliMUONRawStreamTrackerHP(rawReader);    
  rawStream->DisableWarnings();
  rawStream->EnabbleErrorLogger();

  printf("\n %s : Reading data from file %s\n",prefixDA,inputFile.Data());

  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 << endl;
	  filcout<<"//=================================================" << endl;
	  filcout<<"//   * Date          : " << muonPedestal->GetDate()->AsString("l") << "\n" << endl;
	  cout<<"\n ********  " << prefixDA << " for run = " << runNumber << " ********\n" << endl;
	  cout<<" * Date          : " << muonPedestal->GetDate()->AsString("l") << "\n" << endl;

	}

      muonPedestal->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;
      rawStream->First();
      do
	{
	  if (rawStream->IsErrorMessage()) eventIsErrorMessage = kTRUE;
	  eventGlitchErrors += rawStream->GetGlitchErrors();
	  eventParityErrors += rawStream->GetParityErrors();
	  eventPaddingErrors += rawStream->GetPaddingErrors();
	} 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);
		  muonPedestal->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
		}
	    }
	  nEvents++;
	}
      else
	{
	  // Events with errors
	  if (recoverParityErrors && 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);
			  muonPedestal->MakePed(busPatch->GetBusPatchId(), (Int_t)manuId, (Int_t)channelId, (Int_t)charge);
			}
		    }
		  else
		    {
		      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
		      if (!(errorCounter = (AliMUONErrorCounter*) (muonPedestal->GetErrorBuspatchTable()->FindObject(busPatch->GetBusPatchId()))))
			{
			  // New buspatch
			  errorCounter = new AliMUONErrorCounter(busPatch->GetBusPatchId());
			  muonPedestal->GetErrorBuspatchTable()->Add(errorCounter);
			}
		      else
			{
			  // Existing buspatch
			  errorCounter->Increment();
			}	
		      // errorCounter->Print();						
		    } // end of if (!errorCount)
		} // end of while( (busPatch = (AliMUONRawStreamTrackerHP ...
	      nEvents++;
	      nEventsRecovered++;
	    } //end of if (recoverParityErrors && 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<<endl;
	  filcout<<endl;			
	} // end of if (!rawStream->IsErrorMessage())

      if (eventGlitchErrors)  nGlitchErrors++;
      if (eventParityErrors)  nParityErrors++;
      if (eventPaddingErrors) nPaddingErrors++;

    } // while (rawReader->NextEvent())
  delete rawReader;
  delete rawStream;

  sprintf(flatFile,"%s.ped",prefixDA);
  if(shuttleFile.IsNull())shuttleFile=flatFile;
  muonPedestal->SetAliNEvents(nEvents);
  muonPedestal->SetAliRunNumber(runNumber);
  
  muonPedestal->Finalize();  
  muonPedestal->MakeControlHistos();  
  if (!shuttleFile.IsNull())  
  {
    ofstream out(shuttleFile.Data());  
    muonPedestal->MakeASCIIoutput(out);
    out.close();
#ifdef ALI_AMORE
  //
  //Send objects to the AMORE DB
  //
    ostringstream stringout;
    muonPedestal->MakeASCIIoutput(stringout);
    
    amore::da::AmoreDA amoreDA(amore::da::AmoreDA::kSender);
    TObjString peddata(stringout.str().c_str());
    Int_t status =0;
    status = amoreDA.Send("Pedestals",&peddata);
    if ( status )
      cout << "Warning: Failed to write Pedestals in the AMORE database : " << status << endl;
    else 
      cout << "amoreDA.Send(Pedestals) ok" << endl;  
#else
    cout << "Warning: MCH DA not compiled with AMORE support" << endl;
#endif
    
  }

  // 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 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 events recovered      = "   << nEventsRecovered<< endl;	
  filcout << prefixDA << " : Nb of events without errors = "   << nEvents-nEventsRecovered<< endl;
  filcout << prefixDA << " : Nb of events used           = "   << nEvents        << endl;

  // ouput files
  cout << endl;
  cout << prefixDA << " : Output logfile         : " << logOutputFile  << endl;
  cout << prefixDA << " : Pedestal Histo file    : " << muonPedestal->GetHistoFileName() << endl;
  cout << prefixDA << " : Ped. file (to SHUTTLE) : " << shuttleFile << endl;   

  filcout << endl;
  filcout << prefixDA << " : Output logfile         : " << logOutputFile  << endl;
  filcout << prefixDA << " : Pedestal Histo file    : " << muonPedestal->GetHistoFileName() << endl;
  filcout << prefixDA << " : Ped. 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;
  cout << "\n ***  Local DataBase: " << dir << " (Max= " << nLastVersions << ") ***" << endl;
  status = daqDA_localDB_storeFile(muonPedestal->GetHistoFileName(),nLastVersions);
  if(status)printf(" Store file : %s   status = %d\n",muonPedestal->GetHistoFileName(),status);
  status = daqDA_localDB_storeFile(shuttleFile.Data(),nLastVersions);
  if(status)printf(" Store file : %s   status = %d\n",shuttleFile.Data(),status);
  status = daqDA_localDB_storeFile(logOutputFile.Data(),nLastVersions);
  if(status)printf(" Store file : %s   status = %d\n",logOutputFile.Data(),status);

  filcout.close();

  // Transferring to OCDB via the SHUTTLE (be sure that env variable DAQDALIB_PATH is set)
  printf("\n *****  STORE FILE in FES ****** \n");
  status = daqDA_FES_storeFile(shuttleFile.Data(),"PEDESTALS");
  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());

  // Transferring to DetectorDataBase the configuration file if changed
  if(writeConfig)
    {
      printf("\n *****  New detector configuration : STORE Config FILE in Detector DataBase ****** \n");
      Char_t DAdbfile[256]="";
      //      TString DAdbfile=Form("DA_config_%s",getenv("DATE_ROLE_NAME")) ;
      sprintf(DAdbfile,"DA_config_%s",getenv("DATE_ROLE_NAME"));
      status=daqDA_DB_storeFile(dbfile,DAdbfile);
      if(status) {printf(" !!! Failed  : Pb to store config. file %s in DetDB (%s), status = %d\n",dbfile,DAdbfile,status); return -1; }
      else printf(" Copy ascii current config file: %s to %s in DetDB \n",dbfile,DAdbfile);
    }

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