#include "AliT0DataDCS.h"

#include "AliCDBMetaData.h"
#include "AliDCSValue.h"
#include "AliLog.h"

#include <TTimeStamp.h>
#include <TObjString.h>
#include <TH2F.h>
#include <TProfile.h>
#include <TGraph.h>
#include <TDatime.h>
#include <TStyle.h>
#include <TCanvas.h>

ClassImp(AliT0DataDCS)

//---------------------------------------------------------------
AliT0DataDCS::AliT0DataDCS():
	TObject(),
	fRun(0),
	fStartTime(0),
	fEndTime(0),
	fGraphs("TGraph",kNGraphs),
	fIsProcessed(kFALSE)
{
	for(int i=0;i<kNHistos;i++) fHv[i]=0x0;
        fFunc = 0;
}

//---------------------------------------------------------------
AliT0DataDCS::AliT0DataDCS(Int_t nRun, UInt_t startTime, UInt_t endTime):
	TObject(),
	fRun(nRun),
	fStartTime(startTime),
	fEndTime(endTime),
	fGraphs("TGraph",kNGraphs),
	fIsProcessed(kFALSE)
{
	AliInfo(Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s", nRun,
	TTimeStamp(startTime).AsString(),
	TTimeStamp(endTime).AsString()));

        fFunc = 0;
	Init();

}

//---------------------------------------------------------------
AliT0DataDCS::~AliT0DataDCS() {

	for(int i=0;i<kNHistos;i++) {delete fHv[i]; fHv[i]=0;}
	fGraphs.Clear("C");
	fFunc=0;
}

//---------------------------------------------------------------
Bool_t AliT0DataDCS::ProcessData(TMap& aliasMap)
{
/* ** TM 23.11.2007 for testing preprocessor **
	if(!(fHv[0])) Init();

	TObjArray *aliasArr;
	AliDCSValue* aValue;
	for(int j=0; j<kNAliases; j++)
	{
		aliasArr = (TObjArray*) aliasMap.GetValue(fAliasNames[j].Data());
		if(!aliasArr)
		{
			AliError(Form("Alias %s not found!", fAliasNames[j].Data()));
			continue;
		}
		Introduce(j, aliasArr);

		if(aliasArr->GetEntries()<2)
		{
			AliError(Form("Alias %s has just %d entries!",
					fAliasNames[j].Data(),aliasArr->GetEntries()));
			continue;
		}

// TM, 6.10.2007
		TIter iterarray(aliasArr);

		Double_t *time = new Double_t[aliasArr->GetEntries()];
		Double_t *val = new Double_t[aliasArr->GetEntries()];

		UInt_t ne=0;
		while ((aValue = (AliDCSValue*) iterarray.Next())) 
		{
		val[ne] = aValue->GetFloat();
		time[ne] = (Double_t) (aValue->GetTimeStamp());
		// fill histos (alias 0-2)
		if(j < 3) fHv[j]->Fill(val[ne]);
		ne++;
		}
		// fill graphs (alias 3-5)
		if(j >= 3) CreateGraph(j, aliasArr->GetEntries(), time, val);
		delete[] val;
		delete[] time;

// TM, 21.11.2007
          TObjArray *aliasArr;
       // AliDCSValue *aValue;
//TM, 19.11.2007        Float_t t00_a_hv_imon[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_a_hv_vmon[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_a_lv_imon[2]={0,0};
//TM, 19.11.2007        Float_t t00_a_lv_vmon[2]={0,0};
//TM, 19.11.2007        Float_t t00_c_hv_imon[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_c_hv_vmon[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_c_lv_imon[2]={0,0};
//TM, 19.11.2007        Float_t t00_c_lv_vmon[2]={0,0};
//TM, 19.11.2007        Float_t t00_a_cfd_thre[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_a_cfd_walk[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_c_cfd_thre[12]={0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_c_cfd_walk[12]={0,0,0,0,0,0,0,0,0,0,0,0};
        Float_t t00_ac_scaler[32]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_ac_trm[20]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
//TM, 19.11.2007        Float_t t00_ac_drm= 0;

        for(int j=0; j<32; j++)
        {
                TString aliasName =Form("t00_ac_scaler_%d",j);
//TM, 19.11.2007                TString aliasName =Form("t00_a_hv_imon_%d",j);
//TM, 19.11.2007                TString aliasName1 =Form("t00_a_hv_vmon_%d",j);
//TM, 19.11.2007                TString aliasName2 =Form("t00_c_hv_imon_%d",j);
//TM, 19.11.2007                TString aliasName3 =Form("t00_c_hv_vmon_%d",j);
//TM, 19.11.2007                TString aliasName4 =Form("t00_a_cfd_thre_%d",j);
//TM, 19.11.2007                  TString aliasName5 =Form("t00_a_cfd_walk_%d",j);
//TM, 19.11.2007                  TString aliasName6 =Form("t00_c_cfd_thre_%d",j);
//TM, 19.11.2007                  TString aliasName7 =Form("t00_c_cfd_walk_%d",j);

                printf("aliasname: %s\n",aliasName.Data());
                aliasArr = dynamic_cast<TObjArray*> (dcsAliasMap->GetValue(aliasName.Data()));
                if(!aliasArr){
                        AliError(Form("Alias %s not found!", aliasName.Data()));
                        continue;
        }
                AliDCSValue *aValue=dynamic_cast<AliDCSValue*> (aliasArr->At(0));
               // printf("I'm here! %f %x\n", aValue->GetFloat(), aValue->GetTimeStamp());
               // TM, 6.10.2007 hv[j]= aValue->GetFloat()*100;
               //Float_t timestamp= (Float_t) (aValue->GetTimeStamp());
                // printf("hello! hv = %f timestamp = %f\n" ,hv[j], timestamp);


	}

** ** */

/* TM, 6.10.2007

	// calculate mean and rms of the first two histos
	for(int i=0;i<kNHistos;i++)
	{
		fMean[i] = fHv[i]->GetMean();
		fWidth[i] = fHv[i]->GetRMS();
	}

	// pol1 fit of the first graph
	if(fGraphs.GetEntries() > 0)
	{
		((TGraph*) fGraphs.UncheckedAt(0))->Fit("pol1");
		fFunc = ((TGraph*) fGraphs.UncheckedAt(0))->GetFunction("pol1");
	}
*/

	fIsProcessed=kTRUE;
	return kTRUE;
}

//---------------------------------------------------------------
void AliT0DataDCS::Init()
{

	TH1::AddDirectory(kFALSE);

	fGraphs.SetOwner(1);

	for(int i=0;i<kNAliases;i++)
	{
		fAliasNames[i] = "DCSAlias";
		fAliasNames[i] += i;
	}

/* TM, 6.10.2007
	for(int i=0;i<kNHistos;i++)
	{
		fHv[i] = new TH1F(fAliasNames[i].Data(),fAliasNames[i].Data(), 20, kHvMin, kHvMax);
		fHv[i]->GetXaxis()->SetTitle("Hv");
	}
*/
}

//---------------------------------------------------------------
void AliT0DataDCS::Introduce(UInt_t numAlias, const TObjArray* aliasArr){

	int entries=aliasArr->GetEntries();
	AliInfo(Form("************ Alias: %s **********",fAliasNames[numAlias].Data()));
	AliInfo(Form("    	%d DP values collected",entries));

}

//---------------------------------------------------------------
/* TM, 6.10.2007
void AliT0DataDCS::CreateGraph(int i, int dim, const Double_t *x, const Double_t *y)
{

	TGraph *gr = new(fGraphs[fGraphs.GetEntriesFast()]) TGraph(dim, x, y);

	gr->GetXaxis()->SetTimeDisplay(1);
	gr->SetTitle(fAliasNames[i].Data());

	AliInfo(Form("Array entries: %d",fGraphs.GetEntriesFast()));


}

*/

//---------------------------------------------------------------
/* TM, 6.10.2007 

  void AliT0DataDCS::Draw(const Option_t* )
  {
   // Draw all histos and graphs

    if(!fIsProcessed) return;

    TCanvas *ch;
    TString canvasHistoName="Histos";
    ch=new TCanvas(canvasHistoName,canvasHistoName,20,20,600,600);
    ch->Divide(2,2);
    ch->cd(1);
    fHv[0]->Draw();
    ch->cd(2);
    fHv[1]->Draw();
    ch->cd(3);
    fHv[2]->Draw();

    if(fGraphs.GetEntries() == 0) return;

    TCanvas *cg;
    TString canvasGraphName="Graphs";
    cg=new TCanvas(canvasGraphName,canvasGraphName,40,40,600,600);
    cg->Divide(2,2);
    cg->cd(1);
    ((TGraph*) fGraphs.UncheckedAt(0))->Draw("alp");
  
    cg->cd(2);
    ((TGraph*) fGraphs.UncheckedAt(1))->Draw("alp");
    cg->cd(3);
    ((TGraph*) fGraphs.UncheckedAt(2))->Draw("alp");

    if(fFunc)
    {
      cg->cd(4);
      fFunc->Draw("l");
    }
  }
*/