///////////////////////////////////////////////////////////////////////////////
//  some useful scripts - there are things which can be done at the scripting 
//  level
///////////////////////////////////////////////////////////////////////////////
namespace oracle {

void query(const char* Query) {
  // describes 'Table'
  TString cmdd;

  cmdd  = Form("sqlplus cdf_reader/reader@cdfofprd <<EOF\n");
  cmdd += Form("set linesize 1000;\n");
   cmdd += Form("%s;",Query);
  cmdd += Form("\nEOF\n");

  gSystem->Exec(cmdd.Data());
}

//_____________________________________________________________________________
void describe(const char* Table) {
  // describes 'Table'
  TString cmdd;

  cmdd  = Form("sqlplus cdf_reader/reader@cdfofprd <<EOF\n");
  //  cmdd += Form("set linesize 100;\n");
  cmdd += Form("describe %s;",Table);
  cmdd += Form("\nEOF\n");

  gSystem->Exec(cmdd.Data());
}

//_____________________________________________________________________________
void get_filesets (const char* Book, const char* DsNameId) {
  // prints list of filesets for a given dataset 'DsNameId'

  TString cmdd;

  char book[1000];

  if (Book == 0) strcpy(book,"filecatalog");
  else strcpy(book,Book);

  cmdd  = Form("sqlplus cdf_reader/reader@cdfofprd <<EOF | grep %s\n",DsNameId);
  cmdd += Form("set linesize 1000;\n");
  cmdd += Form("select fileset_name, ds_name_id, file_count ");
  cmdd += Form("from %s.cdf2_filesets where ds_name_id='%s';\nEOF\n",book,DsNameId);

  gSystem->Exec(cmdd.Data());
}

//_____________________________________________________________________________
void get_files (const char* Book, const char* Fileset) {
  
  TString cmdd;
  char book[1000];

  if (Book == 0) strcpy(book,"filecatalog");
  else strcpy(book,Book);

  cmdd  = Form("sqlplus cdf_reader/reader@cdfofprd <<EOF | grep %s\n",Fileset);
  cmdd += Form("set linesize 1000;\n");
  cmdd += Form("select fileset_name, file_name, file_size, creation_time, ");
  cmdd += Form("event_count, low_run, low_event, high_run, high_event ");
  cmdd += Form("from %s.cdf2_files where fileset_name='%s' ;\nEOF\n",book,Fileset);

  gSystem->Exec(cmdd.Data());
}

}