Salome HOME
bug on ccrt + eris
[tools/libbatch.git] / src / LoadLeveler / Test / Test_eLL.cxx
1 //  Copyright (C) 2007-2012  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 //  Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
6 //  This library is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU Lesser General Public
8 //  License as published by the Free Software Foundation; either
9 //  version 2.1 of the License.
10 //
11 //  This library is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 //  Lesser General Public License for more details.
15 //
16 //  You should have received a copy of the GNU Lesser General Public
17 //  License along with this library; if not, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19 //
20 //  See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22 /*
23  * Test_ePBS.cxx :
24  *
25  * Author : Renaud BARATE - EDF R&D
26  * Date   : April 2009
27  *
28  */
29
30 #include <iostream>
31 #include <fstream>
32 #include <cstring>
33
34 #include <Batch_Constants.hxx>
35 #include <Batch_Job.hxx>
36 #include <Batch_BatchManagerCatalog.hxx>
37 #include <Batch_FactBatchManager.hxx>
38 #include <Batch_FactBatchManager_eClient.hxx>
39 #include <Batch_FactBatchManager_eLL.hxx>
40 #include <Batch_BatchManager.hxx>
41 #include <Batch_BatchManager_eClient.hxx>
42
43 #include <SimpleParser.hxx>
44
45 using namespace std;
46 using namespace Batch;
47
48 void print_usage()
49 {
50   cout << "usage: Test_eLL PROTOCOL" << endl;
51   cout << "    PROTOCOL      \"SSH\" or \"RSH\"" << endl;
52 }
53
54 int main(int argc, char** argv)
55 {
56   // Parse argument
57   if (argc != 2) {
58     print_usage();
59     return 1;
60   }
61   CommunicationProtocolType protocol;
62   if (strcmp(argv[1], "SSH") == 0)
63     protocol = SSH;
64   else if (strcmp(argv[1], "RSH") == 0)
65     protocol = RSH;
66   else {
67     print_usage();
68     return 1;
69   }
70
71   cout << "*******************************************************************************************" << endl;
72   cout << "This program tests the batch submission based on LoadLeveler emulation. Passwordless" << endl;
73   cout << "authentication must be used for this test to pass. For SSH, this can be configured with" << endl;
74   cout << "ssh-agent for instance. For RSH, this can be configured with the .rhosts file." << endl;
75   cout << "*******************************************************************************************" << endl;
76
77   // eventually remove any previous result
78   remove("result.txt");
79
80   try {
81     // Parse the test configuration file
82     SimpleParser parser;
83     parser.parseTestConfigFile();
84     const string & homedir = parser.getValue("TEST_ELL_HOMEDIR");
85     const string & host = parser.getValue("TEST_ELL_HOST");
86     const string & user = parser.getValue("TEST_ELL_USER");
87     const string & queue = parser.getValue("TEST_ELL_QUEUE");
88     const string & jobType = parser.getValue("TEST_ELL_JOBTYPE");
89     int timeout = parser.getValueAsInt("TEST_ELL_TIMEOUT");
90
91     // Define the job...
92     Job job;
93     // ... and its parameters ...
94     Parametre p;
95     p[EXECUTABLE]    = "./test-script.sh";
96     p[NAME]          = string("Test_eLL_") + argv[1];
97     p[WORKDIR]       = homedir + "/tmp/Batch";
98     p[INFILE]        = Couple("seta.sh", "tmp/Batch/seta.sh");
99     p[INFILE]       += Couple("setb.sh", "tmp/Batch/setb.sh");
100     p[OUTFILE]       = Couple("result.txt", "tmp/Batch/result.txt");
101     p[TMPDIR]        = "tmp/Batch/";
102     p[NBPROC]        = 1;
103     p[MAXWALLTIME]   = 1;
104     p[MAXRAMSIZE]    = 50;
105     p[HOMEDIR]       = homedir;
106     p[QUEUE]         = queue;
107     p[LL_JOBTYPE]    = jobType;
108     p[EXCLUSIVE]     = false;
109     job.setParametre(p);
110     // ... and its environment
111     Environnement e;
112     e["MYENVVAR"] = "MYVALUE";
113     job.setEnvironnement(e);
114     cout << job << endl;
115
116     // Get the catalog
117     BatchManagerCatalog& c = BatchManagerCatalog::getInstance();
118
119     // Create a BatchManager of type ePBS on localhost
120     FactBatchManager_eClient * fbm = (FactBatchManager_eClient *)(c("eLL"));
121     BatchManager_eClient * bm = (*fbm)(host.c_str(), user.c_str(), protocol);
122
123     // Submit the job to the BatchManager
124     JobId jobid = bm->submitJob(job);
125     cout << jobid.__repr__() << endl;
126
127     // Wait for the end of the job
128     string state = bm->waitForJobEnd(jobid, timeout);
129
130     if (state == FINISHED) {
131       cout << "Job " << jobid.__repr__() << " is done" << endl;
132       bm->importOutputFiles(job, "resultdir/seconddirname");
133     } else if (state == FAILED) {
134       cerr << "Job " << jobid.__repr__() << " finished in error" << endl;
135       bm->importOutputFiles(job, "resultdir/seconddirname");
136       return 1;
137     } else {
138       cerr << "Timeout while executing job" << endl;
139       return 1;
140     }
141
142   } catch (GenericException e) {
143     cerr << "Error: " << e << endl;
144     return 1;
145   } catch (ParserException e) {
146     cerr << "Parser error: " << e.what() << endl;
147     return 1;
148   }
149
150   // test the result file
151   try {
152     SimpleParser resultParser;
153     resultParser.parse("resultdir/seconddirname/result.txt");
154     cout << "Result:" << endl << resultParser;
155     const string & envvar = resultParser.getValue("MYENVVAR");
156     int result = resultParser.getValueAsInt("c");
157     if (envvar == "MYVALUE" && result == 12) {
158       cout << "OK, Expected result found." << endl;
159       return 0;
160     } else {
161       cerr << "Error, result is not the expected one (MYENVVAR = MYVALUE, c = 12)." << endl;
162       return 1;
163     }
164   } catch (ParserException e) {
165     cerr << "Parser error on result file: " << e.what() << endl;
166     return 1;
167   }
168 }