Salome HOME
Rename files:
[tools/libbatch.git] / src / PBS / Test / Test_PBS.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_PBS.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 <Constants.hxx>
35 #include <Job.hxx>
36 #include <BatchManagerCatalog.hxx>
37 #include <FactBatchManager.hxx>
38 #include <BatchManager.hxx>
39
40 #include <SimpleParser.hxx>
41
42 using namespace std;
43 using namespace Batch;
44
45 void print_usage()
46 {
47   cout << "usage: Test_PBS PROTOCOL" << endl;
48   cout << "    PROTOCOL      \"SSH\" or \"RSH\"" << endl;
49 }
50
51 int main(int argc, char** argv)
52 {
53   // Parse argument
54   if (argc != 2) {
55     print_usage();
56     return 1;
57   }
58   CommunicationProtocolType protocol;
59   if (strcmp(argv[1], "SSH") == 0)
60     protocol = SSH;
61   else if (strcmp(argv[1], "RSH") == 0)
62     protocol = RSH;
63   else {
64     print_usage();
65     return 1;
66   }
67
68   cout << "*******************************************************************************************" << endl;
69   cout << "This program tests the batch submission based on PBS emulation. Passwordless authentication" << endl;
70   cout << "must be used for this test to pass. For SSH, this can be configured with ssh-agent for" << endl;
71   cout << "instance. For RSH, this can be configured with the .rhosts file." << endl;
72   cout << "*******************************************************************************************" << endl;
73
74   // eventually remove any previous result
75   remove("result.txt");
76
77   try {
78     // Parse the test configuration file
79     SimpleParser parser;
80     parser.parseTestConfigFile();
81     const string & homedir = parser.getValue("TEST_EPBS_HOMEDIR");
82     const string & host = parser.getValue("TEST_EPBS_HOST");
83     const string & user = parser.getValue("TEST_EPBS_USER");
84     const string & queue = parser.getValue("TEST_EPBS_QUEUE");
85     int timeout = parser.getValueAsInt("TEST_EPBS_TIMEOUT");
86
87     // Define the job...
88     Job job;
89     // ... and its parameters ...
90     Parametre p;
91     p[EXECUTABLE]    = "./test-script.sh";
92     p[NAME]          = string("Test_PBS_") + argv[1];
93     p[WORKDIR]       = homedir + "/tmp/Batch";
94     p[INFILE]        = Couple("seta.sh", "tmp/Batch/seta.sh");
95     p[INFILE]       += Couple("setb.sh", "tmp/Batch/setb.sh");
96     p[OUTFILE]       = Couple("result.txt", "tmp/Batch/result.txt");
97     p[NBPROC]        = 1;
98     p[NBPROCPERNODE] = 8;
99     p[MAXWALLTIME]   = 1;
100     p[MAXRAMSIZE]    = 128;
101     p[HOMEDIR]       = homedir;
102     p[QUEUE]         = queue;
103     job.setParametre(p);
104     // ... and its environment
105     Environnement e;
106     e["MYENVVAR"] = "MYVALUE";
107     job.setEnvironnement(e);
108     cout << job << endl;
109
110     // Get the catalog
111     BatchManagerCatalog& c = BatchManagerCatalog::getInstance();
112
113     // Create a BatchManager of type ePBS on localhost
114     FactBatchManager * fbm = c("PBS");
115     BatchManager * bm = (*fbm)(host.c_str(), user.c_str(), protocol, "nompi");
116
117     // Submit the job to the BatchManager
118     JobId jobid = bm->submitJob(job);
119     cout << jobid.__repr__() << endl;
120
121     // Wait for the end of the job
122     string state = bm->waitForJobEnd(jobid, timeout);
123
124     if (state == FINISHED || state == FAILED) {
125       cout << "Job " << jobid.__repr__() << " is done" << endl;
126       bm->importOutputFiles(job, "resultdir/seconddirname");
127     } else {
128       cerr << "Timeout while executing job" << endl;
129       return 1;
130     }
131
132   } catch (GenericException e) {
133     cerr << "Error: " << e << endl;
134     return 1;
135   } catch (ParserException e) {
136     cerr << "Parser error: " << e.what() << endl;
137     return 1;
138   }
139
140   // test the result file
141   try {
142     SimpleParser resultParser;
143     resultParser.parse("resultdir/seconddirname/result.txt");
144     cout << "Result:" << endl << resultParser;
145     const string & envvar = resultParser.getValue("MYENVVAR");
146     int result = resultParser.getValueAsInt("c");
147     if (envvar == "MYVALUE" && result == 12) {
148       cout << "OK, Expected result found." << endl;
149       return 0;
150     } else {
151       cerr << "Error, result is not the expected one (MYENVVAR = MYVALUE, c = 12)." << endl;
152       return 1;
153     }
154   } catch (ParserException e) {
155     cerr << "Parser error on result file: " << e.what() << endl;
156     return 1;
157   }
158 }