KVDBRun.cpp

/***************************************************************************
$Id: KVDBRun.cpp,v 1.14 2009/03/12 14:01:02 franklan Exp $
                          KVDBRun.cpp  -  description
                             -------------------
    begin                : jeu fév 13 2003
    copyright            : (C) 2003 by Alexis Mignon
    email                : mignon@ganil.fr
 ***************************************************************************/
 
/***************************************************************************
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/
#include "KVDBRun.h"
#include "Riostream.h"
#include "TEnv.h"
#include "TObjString.h"
#include "TObjArray.h"
#include "KVDBKey.h"
 
using namespace std;
 
ClassImp(KVDBRun)
 
 
 
KVDBRun::KVDBRun()
{
   //default ctor
   fBlockSignals = kFALSE;
   fRunFiles.SetOwner();
}
 
 
 
 
KVDBRun::KVDBRun(Int_t number, const Char_t* title)
{
   //ctor for a given run number
 
   SetNumber(number);
   SetTitle(title);
   fBlockSignals = kFALSE;
   fRunFiles.SetOwner();
}
 
 
 
 
 
 
void KVDBRun::Print(Option_t*) const
{
   cout << "___________________________________________________" << endl
        << GetName() << "  (" << GetTitle() << ")" << endl;
   if (GetSystem()) {
      cout << "System : " << GetSystem()->GetName() << endl;
      if (GetSystem()->GetTarget())
         cout << "Target : " << GetSystem()->GetTarget()->
              GetName() << endl;
   }
   cout << "___________________________________________________" << endl;
   //print values of all parameters
   if (fParameters.GetNpar()) {
      fParameters.Print("string");
      cout << "___________________________________________________" << endl;
      fParameters.Print("double");
      cout << "___________________________________________________" << endl;
      fParameters.Print("int");
      cout << "___________________________________________________" << endl;
   }
   std::cout << " -- " << fRunFiles.GetEntries() << " associated files:\n";
   fRunFiles.ls();
   cout << "___________________________________________________" << endl;
}
 
 
 
 
 
void KVDBRun::WriteRunListLine(ostream& outstr, Char_t) const
{
   //Write informations on run in format used for runlists, i.e. a line of fields separated by the
   //separator character '|' (the 'delim' argument is obsolete and is not used)
 
   TString _delim = " | ";
   KVString s;
   //write run number
   outstr << GetNumber() << _delim.Data();
   //write all scalers (integer values)
   for (int i = 0; i < fParameters.GetNpar(); i++) {
      if (fParameters.GetParameter(i)->IsInt()) {
         s.Form("%s=%d", fParameters.GetParameter(i)->GetName(), fParameters.GetParameter(i)->GetInt());
         outstr << s.Data() << _delim.Data();
      }
   }
   //write all floating point values
   for (int i = 0; i < fParameters.GetNpar(); i++) {
      if (fParameters.GetParameter(i)->IsDouble()) {
         s.Form("%s=%f", fParameters.GetParameter(i)->GetName(), fParameters.GetParameter(i)->GetDouble());
         outstr << s.Data() << _delim.Data();
      }
   }
   //write all string values
   for (int i = 0; i < fParameters.GetNpar(); i++) {
      if (fParameters.GetParameter(i)->IsString()) {
         // as we write all strings as 'parname=value', there is a problem if the string 'value'
         // itself contains the '=' symbol !!
         // therefore we replace any '=' in the string by '\equal' before writing in the file.
         // when reading back (see ReadRunListLine), we replace '\equal' by '='
         TString tmp(fParameters.GetParameter(i)->GetString());
         tmp.ReplaceAll("=", "\\equal");
         s.Form("%s=%s", fParameters.GetParameter(i)->GetName(), tmp.Data());
         outstr << s.Data() << _delim.Data();
      }
   }
   outstr << endl;
}
 
 
 
 
 
void KVDBRun::ReadRunListLine(const KVString& line)
{
   //Set run characteristics by reading informations in 'line' (assumed to have been written
   //by WriteRunListLine).
 
   //Break line into fields using delimiter '|'
   TObjArray* fields = line.Tokenize('|');
   if (fields->GetEntries() < 1) {
      //not a valid line for run
      delete fields;
      return;
   }
 
   //first field is run number
   KVString kvs = ((TObjString*)fields->At(0))->String().Remove(TString::kBoth, ' ');
   if (kvs.IsDigit()) {
      SetNumber(kvs.Atoi());
   }
   else {
      //not a valid line for run
      delete fields;
      return;
   }
 
//  cout << GetName() << endl;
 
   //loop over other fields
   for (int i = 1; i < fields->GetEntries(); i++) {
 
      //each field is of the form "parameter=value"
      KVString kvs = ((TObjString*)fields->At(i))->String().Remove(TString::kBoth, ' ');
      TObjArray* toks = kvs.Tokenize('=');
      if (toks->GetEntries() == 2) {
         KVString parameter = ((TObjString*)toks->At(0))->String().Remove(TString::kBoth, ' ');
         KVString value = ((TObjString*)toks->At(1))->String().Remove(TString::kBoth, ' ');
         //set parameter based on value
         if (value.IsDigit()) {
            //only true for non-floating point i.e. scaler values
            SetScaler(parameter.Data(), value.Atoi());
//            cout << " -- SCA " << parameter.Data() << " = " << GetScaler(parameter.Data()) << endl;
         }
         else if (value.IsFloat()) {
            Set(parameter.Data(), value.Atof());
            //          cout << " -- FLO " << parameter.Data() << " = " << Get(parameter.Data()) << endl;
         }
         else {   // string value
            // as we write all strings as 'parname=value', there is a problem if the string 'value'
            // itself contains the '=' symbol !!
            // therefore we replace any '=' in the string by '\equal' before writing in the file
            // (see WriteRunListLine).
            // when reading back, we replace '\equal' by '='
            value.ReplaceAll("\\equal", "=");
            Set(parameter.Data(), value.Data());
            //        cout << " -- STR " << parameter.Data() << " = " << GetString(parameter.Data()) << endl;
         }
      }
      delete toks;
   }
 
   delete fields;
}
 
 
 
 
 
void KVDBRun::WriteRunListHeader(ostream& outstr, Char_t) const
{
   //Write the version flag
 
   outstr << "Version=10" << endl;
}
 
 
 
 
void KVDBRun::UnsetSystem()
{
   //If this run has previously been associated with a system in the database,
   //this will remove the association. The run will also be removed from the system's
   //list of associated runs.
 
   if (GetSystem()) {
      GetSystem()->RemoveRun(this);
   }
   SetTitle("Experimental run");
   Modified();
}
 
 
 
 
KVDBSystem* KVDBRun::GetSystem() const
{
   if (GetKey("Systems")) {
      if (GetKey("Systems")->GetLinks()->GetSize())
         return (KVDBSystem*) GetKey("Systems")->GetLinks()->First();
   }
   return 0;
}
 
 
 
 
void KVDBRun::SetSystem(KVDBSystem* system)
{
   //Set system for run. Any previous system is unassociated (run will be removed from system's list)
   if (!GetKey("Systems")) {
      KVDBKey* key = AddKey("Systems", "Physical system used");
      key->SetUniqueStatus(kTRUE);
      key->SetSingleStatus(kTRUE);
   }
   else {
      UnsetSystem();
   }
   if (!AddLink("Systems", system)) {
      Warning("SetSystem(KVDBSystem*)",
              "System %s couldn't be set for Run %d. This bizarre...",
              system->GetName(), GetNumber());
   }
   else {
      //set title of run = name of system
      SetTitle(system->GetName());
   }
   Modified();
}