PHOS/AliPHOSGridFile.cxx

   1 /**************************************************************************
   2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
   3  *                                                                        *
   4  * Author: The ALICE Off-line Project.                                    *
   5  * Contributors are mentioned in the code where appropriate.              *
   6  *                                                                        *
   7  * Permission to use, copy, modify and distribute this software and its   *
   8  * documentation strictly for non-commercial purposes is hereby granted   *
   9  * without fee, provided that the above copyright notice appears in all   *
  10  * copies and that both the copyright notice and this permission notice   *
  11  * appear in the supporting documentation. The authors make no claims     *
  12  * about the suitability of this software for any purpose. It is          *
  13  * provided "as is" without express or implied warranty.                  *
  14  **************************************************************************/
  15 /* $Id$ */
  16
  17 /* History of cvs commits:
  18  *
  19  * $Log$
  20  * Revision 1.5  2005/05/28 14:19:04  schutz
  21  * Compilation warnings fixed by T.P.
  22  *
  23  */
  24
  25 //_________________________________________________________________________
  26 // To navigate in the Grid catalogue (very elementary)
  27 // check here : /afs/cern.ch/user/p/peters/public/README.ALIEN
  28 //-- Author: Yves Schutz (CERN)
  29
  30 // --- ROOT system ---
  31 #include "TObjString.h"
  32 #include "TGrid.h"
  33 #include "TGridResult.h"
  34
  35 // --- Standard library ---
  36
  37 // --- AliRoot header files ---
  38 #include "AliLog.h"
  39 #include "AliPHOSGridFile.h"
  40
  41 ClassImp(AliPHOSGridFile)
  42
  43 //____________________________________________________________________________
  44 AliPHOSGridFile::AliPHOSGridFile(TString grid):
  45   fGrid(0),
  46   fRoot("/alice/production/aliprod"),
  47   fYear(""),
  48   fProd(""),
  49   fVers(""),
  50   fType(""),
  51   fRun(""),
  52   fEvt(""),
  53   fPath("")
  54 {
  55   // default ctor; Doing initialisation ;
  56   if (grid == "alien")
  57     fGrid = TGrid::Connect("alien://aliendb1.cern.ch:15000/?direct") ;
  58   else
  59     Error("AliPHOSGridFile", " %s is an unknown grid system", grid.Data()) ;
  60   if ( !fGrid )
  61     Error("ctor", "Cannot connect to alien://aliendb1.cern.ch:15000/?direct") ;
  62
  63 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
  64   if ( !fGrid->OpenDir(fRoot) )
  65     Error("ctor", "Cannot find directory %s ", fRoot.Data() ) ;
  66 #else
  67   Error("AliPHOSGridFile", "needs to be ported to new TGrid");
  68 #endif
  69
  70   fPath += fRoot ;
  71 }
  72
  73 //____________________________________________________________________________
  74 AliPHOSGridFile::AliPHOSGridFile(const AliPHOSGridFile &rhs) :
  75   TObject(rhs),
  76   fGrid(0),
  77   fRoot(""),
  78   fYear(""),
  79   fProd(""),
  80   fVers(""),
  81   fType(""),
  82   fRun(""),
  83   fEvt(""),
  84   fPath("")
  85 {
  86   //copy ctor
  87   rhs.Copy(*this);
  88 }
  89
  90 //____________________________________________________________________________
  91 AliPHOSGridFile::~AliPHOSGridFile()
  92 {
  93 }
  94
  95 //____________________________________________________________________________
  96 TString AliPHOSGridFile::GetLFN() const
  97 {
  98   TString fileName(Pwd()) ;
  99   fileName += "galice.root" ;
 100 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 101   if ( !fGrid->GetAccessPath(fileName) ) {
 102     AliWarning(Form("file %s does not exist", fileName.Data())) ;
 103     fileName = "" ;
 104   }
 105   else
 106     fileName.Prepend("alien://") ;
 107 #else
 108   Error("GetLFN", "needs to be ported to new TGrid");
 109 #endif
 110   return fileName ;
 111 }
 112
 113 //____________________________________________________________________________
 114 void AliPHOSGridFile::Copy(TObject & obj)const
 115 {
 116   //Copy method used by the Copy ctor
 117   AliPHOSGridFile &lfn = static_cast<AliPHOSGridFile &>(obj);
 118   /* incorrect Copy, destination is OBJ, not this.
 119   fRoot = lfn.fRoot ;
 120   fYear = lfn.fYear ;
 121   fProd = lfn.fProd ;
 122   fVers = lfn.fVers ;
 123   fType = lfn.fType ;
 124   fRun  = lfn.fRun ;
 125   fEvt  = lfn.fEvt ;
 126   TObject::Copy(lfn) ;
 127   */
 128   lfn.fRoot = fRoot ;
 129   lfn.fYear = fYear ;
 130   lfn.fProd = fProd ;
 131   lfn.fVers = fVers ;
 132   lfn.fType = fType ;
 133   lfn.fRun  = fRun ;
 134   lfn.fEvt  = fEvt ;
 135   TObject::Copy(lfn) ;
 136 }
 137
 138 //____________________________________________________________________________
 139 void AliPHOSGridFile::Help()
 140 {
 141   // Prints information on available lfn's
 142
 143   AliInfo(Form("")) ;
 144
 145 }
 146
 147 //____________________________________________________________________________
 148 void AliPHOSGridFile::ListEvents() const
 149 {
 150   // list the available events for the current path and run selected
 151
 152   char path[80] ;
 153   sprintf(path, "%s/%s-%s/%s/%s/%s", fRoot.Data(), fYear.Data(), fProd.Data(), fVers.Data(), fType.Data(), fRun.Data()) ;
 154   AliInfo(Form("Searching %s", path)) ;
 155 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 156   Grid_ResultHandle_t gr = fGrid->Find(path, "galice.root") ;
 157   TGridResult ar(gr) ;
 158   ar.Print() ;
 159 #else
 160   Error("ListEvents", "needs to be ported to new TGrid");
 161 #endif
 162 }
 163
 164 //____________________________________________________________________________
 165 void AliPHOSGridFile::ListRuns() const
 166 {
 167   // list the available runs for the current path selected
 168
 169   char path[80] ;
 170   sprintf(path, "%s/%s-%s/%s/%s", fRoot.Data(), fYear.Data(), fProd.Data(), fVers.Data(), fType.Data()) ;
 171   AliInfo(Form("Searching %s", path)) ;
 172 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 173   Grid_ResultHandle_t gr = fGrid->OpenDir(path) ;
 174   TGridResult ar(gr) ;
 175   ar.Print() ;
 176 #else
 177   Error("ListRuns", "needs to be ported to new TGrid");
 178 #endif
 179 }
 180
 181 //____________________________________________________________________________
 182 Bool_t AliPHOSGridFile::SetYearProd(TString year, TString prod)
 183 {
 184   // set the year and verifies if the directory exists
 185   Bool_t rv = kFALSE ;
 186   char tempo[80] ;
 187   sprintf(tempo, "/%s-%s", year.Data(), prod.Data()) ;
 188
 189   TString path(fRoot) ;
 190   path += tempo ;
 191 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 192   if ( !fGrid->OpenDir(path) ) {
 193     AliError(Form("Cannot find directory %s", path.Data() )) ;
 194   } else {
 195     rv = kTRUE ;
 196     fYear = year ;
 197     fProd = prod ;
 198     fPath = path ;
 199   }
 200 #else
 201   Error("SetYearProd", "needs to be ported to new TGrid");
 202 #endif
 203   return rv ;
 204 }
 205
 206 //____________________________________________________________________________
 207 Bool_t AliPHOSGridFile::SetVers(TString vers)
 208 {
 209   // set the year and verifies if the directory exists
 210   Bool_t rv = kFALSE ;
 211   char tempo[80] ;
 212   sprintf(tempo, "/%s-%s/%s", fYear.Data(), fProd.Data(), vers.Data()) ;
 213   fVers = tempo ;
 214
 215   TString path(fRoot) ;
 216   path += tempo ;
 217 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 218   if ( !fGrid->OpenDir(path) ) {
 219     AliError(Form("Cannot find directory %s ", path.Data() )) ;
 220   } else {
 221     rv = kTRUE ;
 222     fVers = vers ;
 223     fPath = path ;
 224   }
 225 #else
 226   Error("SetVers", "needs to be ported to new TGrid");
 227 #endif
 228   return rv ;
 229 }
 230
 231 //____________________________________________________________________________
 232 Bool_t AliPHOSGridFile::SetType(TString type)
 233 {
 234   // set the year and verifies if the directory exists
 235   Bool_t rv = kFALSE ;
 236   char tempo[80] ;
 237   sprintf(tempo, "/%s-%s/%s/%s", fYear.Data(), fProd.Data(), fVers.Data(), type.Data()) ;
 238
 239   TString path(fRoot) ;
 240   path += tempo ;
 241 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 242   if ( !fGrid->OpenDir(path) ) {
 243     AliError(Form("Cannot find directory %s ", path.Data() )) ;
 244   } else {
 245     rv = kTRUE ;
 246     fType = type ;
 247     fPath = path ;
 248   }
 249 #else
 250   Error("SetType", "needs to be ported to new TGrid");
 251 #endif
 252   return rv ;
 253 }
 254
 255 //____________________________________________________________________________
 256 Bool_t AliPHOSGridFile::SetPath(TString year, TString prod, TString vers, TString type)
 257 {
 258   // set the year and verifies if the directory exists
 259   Bool_t rv = kFALSE ;
 260   char tempo[80] ;
 261   sprintf(tempo, "/%s-%s/%s/%s", year.Data(), prod.Data(), vers.Data(), type.Data()) ;
 262
 263   TString path(fRoot) ;
 264   path += tempo ;
 265 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 266   if ( !fGrid->OpenDir(path) ) {
 267     AliError(Form("Cannot find directory %s ", path.Data() )) ;
 268   } else {
 269     rv = kTRUE ;
 270     fPath = path ;
 271     fYear += year ;
 272     fProd += prod ;
 273     fVers += vers ;
 274     fType += type ;
 275   }
 276 #else
 277   Error("SetPath", "needs to be ported to new TGrid");
 278 #endif
 279   return rv ;
 280 }
 281
 282 //____________________________________________________________________________
 283 Bool_t AliPHOSGridFile::SetRun(Int_t run)
 284 {
 285   // set the year and verifies if the directory exists
 286   Bool_t rv = kFALSE ;
 287
 288   TString zero("00000") ;
 289   TString srun ;
 290   srun += run ;
 291   Int_t nzero = zero.Length() - srun.Length() ;
 292   Int_t index ;
 293   for (index = 0 ; index < nzero ; index++)
 294     srun.Prepend("0") ;
 295
 296   char tempo[80] ;
 297   sprintf(tempo, "/%s-%s/%s/%s/%s", fYear.Data(), fProd.Data(), fVers.Data(), fType.Data(), srun.Data()) ;
 298
 299   TString path(fRoot) ;
 300   path += tempo ;
 301 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 302   if ( !fGrid->OpenDir(path) ) {
 303     AliError(Form("Cannot find directory %s ", path.Data() )) ;
 304   } else {
 305     rv = kTRUE ;
 306     fRun = srun ;
 307     fPath = path ;
 308   }
 309 #else
 310   Error("SetRun", "needs to be ported to new TGrid");
 311 #endif
 312   return rv ;
 313 }
 314
 315 //____________________________________________________________________________
 316 Bool_t AliPHOSGridFile::SetEvt(Int_t evt)
 317 {
 318   // set the year and verifies if the directory exists
 319   Bool_t rv = kFALSE ;
 320
 321   TString zero("00000") ;
 322   TString sevt ;
 323   sevt += evt ;
 324   Int_t nzero = zero.Length() - sevt.Length() ;
 325   Int_t index ;
 326   for (index = 0 ; index < nzero ; index++)
 327     sevt.Prepend("0") ;
 328
 329   char tempo[80] ;
 330   sprintf(tempo, "/%s-%s/%s/%s/%s/%s/", fYear.Data(), fProd.Data(), fVers.Data(), fType.Data(), fRun.Data(), sevt.Data()) ;
 331   TString path(fRoot) ;
 332   path += tempo ;
 333 #if ROOT_VERSION_CODE < ROOT_VERSION(5,0,0)
 334   if ( !fGrid->OpenDir(path) ) {
 335     AliError(Form("Cannot find directory %s ", path.Data() )) ;
 336   } else {
 337     rv = kTRUE ;
 338     fEvt = sevt ;
 339     fPath = path ;
 340   }
 341 #else
 342   Error("SetEvt", "needs to be ported to new TGrid");
 343 #endif
 344   return rv ;
 345 }