src/PBS/Batch_JobInfo_ePBS.cxx

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