// Macro to make a tag file for a full run directly from ESDs and the GRP
// Takes as parameters a text file with the location of all ESD files
// for a given run (can be modified to work on any chain of ESDs)
// Second argument is the run number, for which the GRP will be retrieved
// Suitable for a GRID job - runs with pure ROOT to minimize memory 
// consumption but needs ALIROOT package location to load only necessary
// AliRoot libraries.
//
// Author: Adam.Kisiel@cern.ch

class AliGRPObject;

AliGRPObject *GetGRPForRun(Int_t runno) {
  AliCDBManager* man = AliCDBManager::Instance();
  man->SetDefaultStorage("raw://");
  man->SetRun(runno);
  AliCDBEntry* e = man->Get("GRP/GRP/Data");
  AliGRPObject* o = (AliGRPObject*)e->GetObject();
  
  return o;
}

void ReMakeTagsFullRun(const char *esdfile, Int_t runno)
{
  gSystem->Load("libProofPlayer");
  gSystem->Load("libVMC");
  gSystem->Load("libSTEERBase");
  gSystem->Load("libESD");
  gSystem->Load("libAOD");
  gSystem->Load("libANALYSIS");
  gSystem->Load("libANALYSISalice");
  gSystem->Load("libGui");
  gSystem->Load("libCDB");

  gSystem->Load("libMinuit");
  gSystem->Load("libRAWDatabase");

  gSystem->Load("libSTEER");
  gSystem->Load("libXMLParser");

  TGrid::Connect("alien://");


  AliGRPObject *grpo = GetGRPForRun(runno);
  
  AliESDTagCreator *tagCre = new AliESDTagCreator();
  tagCre->SetStorage(0);


  TChain *chain = new TChain("esdTree");;
  ifstream *istr = new ifstream(esdfile);

  char fname[2000];
  char pname[2000];
  while (!istr->eof()) {
    fname[0] = '\0';
    (*istr) >> fname;
    if (strlen(fname) > 10) {
      sprintf(pname, "alien://%s", fname);
      chain->Add(pname);
    }
  }

  tagCre->CreateESDTagsFullRun(chain, grpo, 0, 0, 0, 0);  
}