/[PAMELA software]/DarthVader/RunInfo/src/RunInfoCore.cpp
ViewVC logotype

Contents of /DarthVader/RunInfo/src/RunInfoCore.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.4 - (show annotations) (download)
Fri Nov 17 10:08:09 2006 UTC (18 years ago) by mocchiut
Branch: MAIN
Changes since 1.3: +1 -0 lines
Added some checks on MySQL connection

1 //
2 // C/C++ headers
3 //
4 #include <iostream>
5 #include <sstream>
6 //
7 // ROOT headers
8 //
9 #include <TString.h>
10 #include <TSQLServer.h>
11 #include <TFile.h>
12 #include <TSystem.h>
13 //
14 #include <RunInfo.h>
15 using namespace std;
16 //
17 int RunInfoCore(UInt_t run, TFile *processFile, TSQLServer *dbc, TString DVV, Int_t runargc, char *runargv[]){
18 Int_t i = 0;
19 Int_t sgnl = 0;
20 //
21 TString processFolder = "runinfoFolder";
22 if ( runargc > 0 ){
23 i = 0;
24 while ( i < runargc ){
25 if ( !strcmp(runargv[i],"-processFolder") ) {
26 if ( runargc < i+1 ){
27 throw -3;
28 };
29 processFolder = (TString)runargv[i+1];
30 i++;
31 };
32 i++;
33 };
34 };
35 ItoRunInfo *runinfo = 0;
36 stringstream temprname;
37 const char* routdir = gSystem->DirName(gSystem->DirName(processFile->GetPath()));
38 temprname.str("");
39 temprname << routdir;
40 temprname << "/" << processFolder.Data();
41 //
42 if ( !dbc->IsConnected() ) throw -807;
43 runinfo = new ItoRunInfo(dbc,processFile,processFolder);
44 sgnl = runinfo->Update(run,"NONE","");
45 gSystem->Unlink(temprname.str().c_str());
46 //
47 runinfo->Close();
48 processFile->cd();
49 if ( processFile ) processFile->Write("Run");
50 runinfo->Clear();
51 //
52 delete runinfo;
53 //
54 runinfo = new ItoRunInfo(processFile);
55 sgnl = runinfo->Update(run,"DV",DVV);
56 gSystem->Unlink(temprname.str().c_str());
57 runinfo->Close();
58 processFile->cd();
59 if ( processFile ) processFile->Write("Run");
60 runinfo->Clear();
61 delete runinfo;
62 //
63 //
64 //
65 if ( sgnl < 0 ) throw sgnl;
66 return(sgnl);
67 }

  ViewVC Help
Powered by ViewVC 1.1.23