src/PBS/Batch_JobInfo_ePBS.cxx

   1 //  Copyright (C) 2007-2010  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  * JobInfo_ePBS.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 <fstream>
  35 #include <sstream>
  36
  37 #include "Batch_Constants.hxx"
  38 #include "Batch_Parametre.hxx"
  39 #include "Batch_Environnement.hxx"
  40 #include "Batch_RunTimeException.hxx"
  41 #include "Batch_APIInternalFailureException.hxx"
  42 #include "Batch_JobInfo_ePBS.hxx"
  43
  44 using namespace std;
  45
  46 namespace Batch {
  47
  48   // Constructeurs
  49   JobInfo_ePBS::JobInfo_ePBS(int id, string logFile) : JobInfo()
  50   {
  51     // On remplit les membres _param et _env
  52     ostringstream oss;
  53     oss << id;
  54     _param[ID] = oss.str();
  55
  56     // read of log file
  57     char line[128];
  58     ifstream fp(logFile.c_str(),ios::in);
  59
  60     string sline;
  61     size_t pos = string::npos;
  62     while( (pos == string::npos) && fp.getline(line,80,'\n') ){
  63       sline = string(line);
  64       pos = sline.find("job_state");
  65     };
  66
  67     if(pos!=string::npos){
  68       string status;
  69       istringstream iss(sline);
  70       iss >> status;
  71       iss >> status;
  72       iss >> status;
  73
  74       if (status == "C") {        // Completed
  75         _param[STATE] = FINISHED;
  76       } else if (status == "E") { // Exiting
  77         _param[STATE] = RUNNING;
  78       } else if (status == "H") { // Held
  79         _param[STATE] = PAUSED;
  80       } else if (status == "Q") { // Queued
  81         _param[STATE] = QUEUED;
  82       } else if (status == "R") { // Running
  83         _param[STATE] = RUNNING;
  84       } else if (status == "S") { // Suspend
  85         _param[STATE] = PAUSED;
  86       } else if (status == "T") { // Transiting
  87         _param[STATE] = IN_PROCESS;
  88       } else if (status == "W") { // Waiting
  89         _param[STATE] = PAUSED;
  90       } else {
  91         cerr << "Unknown job state code: " << status << endl;
  92       }
  93     } else {
  94       // On some batch managers, the job is deleted as soon as it is finished,
  95       // so we have to consider that an unknown job is a finished one, even if
  96       // it is not always true.
  97       _param[STATE] = FINISHED;
  98     }
  99   }
 100
 101   // Destructeur
 102   JobInfo_ePBS::~JobInfo_ePBS()
 103   {
 104     // Nothing to do
 105   }
 106
 107   // Convertit une date HH:MM:SS en secondes
 108   long JobInfo_ePBS::HMStoLong(const string & s)
 109   {
 110     long hour, min, sec;
 111
 112     sscanf( s.c_str(), "%ld:%ld:%ld", &hour, &min, &sec);
 113     return ( ( ( hour * 60L ) + min ) * 60L ) + sec;
 114   }
 115
 116   // Methode pour l'interfacage avec Python (SWIG) : affichage en Python
 117   string JobInfo_ePBS::__str__() const
 118   {
 119     ostringstream sst;
 120     sst << "<JobInfo_ePBS (" << this << ") :" << endl;
 121     sst << " ID = " <<_param[ID] << endl;
 122     sst << " STATE = " <<_param[STATE] << endl;
 123
 124     return sst.str();
 125   }
 126
 127 }