Salome HOME
Copyright update 2021
[tools/libbatch.git] / src / PBS / JobInfo_PBS.cxx
1 // Copyright (C) 2007-2021  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, or (at your option) any later version.
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  * JobInfo_PBS.cxx :  emulation of PBS client
24  *
25  * Auteur : Bernard SECHER - CEA DEN
26  * Mail   : mailto:bernard.secher@cea.fr
27  * Date   : Thu Apr 24 10:17:22 2008
28  * Projet : PAL Salome
29  *
30  */
31
32 #include <cstdio>
33 #include <iostream>
34 #include <sstream>
35
36 #include <Constants.hxx>
37 #include "JobInfo_PBS.hxx"
38 #include "Log.hxx"
39
40 using namespace std;
41
42 namespace Batch {
43
44   // Constructeurs
45   JobInfo_PBS::JobInfo_PBS(int id, string queryOutput) : JobInfo()
46   {
47     // Fill ID parameter
48     ostringstream oss;
49     oss << id;
50     _param[ID] = oss.str();
51
52     // read query output
53     istringstream queryIss(queryOutput);
54     string line;
55     size_t pos = string::npos;
56     while( (pos == string::npos) && getline(queryIss, line) ) {
57       pos = line.find("job_state");
58     }
59
60     if(pos!=string::npos){
61       string status;
62       istringstream iss(line);
63       iss >> status;
64       iss >> status;
65       iss >> status;
66
67       if (status == "C") {        // Completed
68         _param[STATE] = FINISHED;
69       } else if (status == "E") { // Exiting
70         _param[STATE] = RUNNING;
71       } else if (status == "H") { // Held
72         _param[STATE] = PAUSED;
73       } else if (status == "Q") { // Queued
74         _param[STATE] = QUEUED;
75       } else if (status == "R") { // Running
76         _param[STATE] = RUNNING;
77       } else if (status == "S") { // Suspend
78         _param[STATE] = PAUSED;
79       } else if (status == "T") { // Transiting
80         _param[STATE] = IN_PROCESS;
81       } else if (status == "W") { // Waiting
82         _param[STATE] = PAUSED;
83       } else {
84         LOG("Unknown job state code: " << status);
85       }
86     } else {
87       // On some batch managers, the job is deleted as soon as it is finished,
88       // so we have to consider that an unknown job is a finished one, even if
89       // it is not always true.
90       _param[STATE] = FINISHED;
91     }
92   }
93
94   // Destructeur
95   JobInfo_PBS::~JobInfo_PBS()
96   {
97     // Nothing to do
98   }
99
100   // Convertit une date HH:MM:SS en secondes
101   long JobInfo_PBS::HMStoLong(const string & s)
102   {
103     long hour, min, sec;
104
105     sscanf( s.c_str(), "%ld:%ld:%ld", &hour, &min, &sec);
106     return ( ( ( hour * 60L ) + min ) * 60L ) + sec;
107   }
108
109   // Methode pour l'interfacage avec Python (SWIG) : affichage en Python
110   string JobInfo_PBS::__str__() const
111   {
112     ostringstream sst;
113     sst << "<JobInfo_PBS (" << this << ") :" << endl;
114     sst << " ID = " <<_param[ID] << endl;
115     sst << " STATE = " <<_param[STATE] << endl;
116
117     return sst.str();
118   }
119
120 }