1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
18 //-----------------------------------------------------------------
19 // AliPackageFrame class
20 // The class that deals with the package tab of the GUI
21 // Origin: Panos Christakoglou, UOA-CERN, Panos.Christakoglou@cern.ch
22 //-----------------------------------------------------------------
26 #include <TGFileDialog.h>
28 #include <TGTextEntry.h>
29 #include <TObjArray.h>
30 #include <TObjString.h>
34 #include "AliAnalysisGUI.h"
35 #include "AliPackageFrame.h"
37 ClassImp(AliPackageFrame)
39 //___________________________________________________________________________
40 AliPackageFrame::AliPackageFrame (const TGWindow *main, UInt_t w, UInt_t h, AliAnalysisGUI * v):
41 TGHorizontalFrame(main, w, h),
42 fVFrame1(0), fVFrame2(0),
43 fLabel1(0), fTextPackage(0), fButtonSelect(0), fButtonBuild(0),
47 fVFrame1 = new TGVerticalFrame(this, 100, 100);
48 AddFrame(fVFrame1, new TGLayoutHints(kLHintsLeft, 5,5,5,5));
50 fLabel1 = new TGLabel(fVFrame1, new TGString("PAR file"));
51 fVFrame1->AddFrame(fLabel1, new TGLayoutHints(kLHintsTop, 5,5,10,5));
53 fTextPackage = new TGTextEntry(fVFrame1, new TGTextBuffer(50));
54 fVFrame1->AddFrame(fTextPackage, new TGLayoutHints(kLHintsBottom, 5,5,5,5));
55 fTextPackage->SetEnabled(false);
57 fVFrame2 = new TGVerticalFrame(this, 100, 200);
58 AddFrame(fVFrame2, new TGLayoutHints(kLHintsLeft, 5,5,5,5));
60 fButtonSelect = new TGTextButton(fVFrame2, "Select...", 1);
61 fVFrame2->AddFrame(fButtonSelect, new TGLayoutHints(kLHintsExpandX | kLHintsTop, 5,5,5,5));
62 fButtonSelect->Connect("Clicked()", "AliPackageFrame", this, "OnSelect()");
64 fButtonBuild = new TGTextButton(fVFrame2, "Build...", 2);
65 fVFrame2->AddFrame(fButtonBuild, new TGLayoutHints(kLHintsExpandX | kLHintsBottom, 5,5,5,5));
67 fButtonBuild->Connect("Clicked()", "AliPackageFrame", this, "OnBuild()");
74 //___________________________________________________________________________
75 void AliPackageFrame::OnSelect() {
76 // When Select button is pressed.
77 const char *filetypes[] = {
83 static TString dir(".");
85 fi.fFileTypes = filetypes;
86 fi.fIniDir = StrDup(dir);
88 new TGFileDialog(gClient->GetRoot(), fAliAnalysisGUI, kFDOpen, &fi);
90 fTextPackage->SetText(fi.fFilename);
94 //___________________________________________________________________________
95 void AliPackageFrame::OnBuild() {
97 // When Build button is pressed.
99 TString fname (fTextPackage->GetText());
101 TObjArray *a = fname.Tokenize("/");
102 TObjString * ostr = (TObjString*)a->At(a->GetEntries()-1);
104 CreatePARFile(ostr->GetString().Data());
108 //___________________________________________________________________________
109 void AliPackageFrame::CreatePARFile(const char* pararchivename) {
112 if (pararchivename) {
113 char processline[1024];
114 // sprintf(processline,".! tar xvzf ../tags/%s.par",pararchivename);
115 sprintf(processline,".! tar xvzf %s",pararchivename);
116 gROOT->ProcessLine(processline);
118 // const char* ocwd = gSystem->WorkingDirectory();
119 gSystem->ChangeDirectory("ESD");
121 // check for BUILD.sh and execute
122 if (!gSystem->AccessPathName("PROOF-INF/BUILD.sh")) {
123 printf("*******************************\n");
124 printf("*** Building PAR archive ***\n");
125 printf("*******************************\n");
126 if (gSystem->Exec("PROOF-INF/BUILD.sh")) {
127 Error("batchSelector","Cannot Build the PAR Archive! - Abort!");
131 if (!gSystem->AccessPathName("PROOF-INF/SETUP.C")) {
133 printf("*******************************\n");
134 printf("*** Setup PAR archive ***\n");
135 printf("*******************************\n");
137 gROOT->Macro("PROOF-INF/SETUP.C");
140 gSystem->ChangeDirectory("../");