guess from the local hostname whether we are running as a PBS job on

damiana.aei.mpg.de (where PBS_O_HOST isn't set by the MPI runtime system)


git-svn-id: http://svn.cactuscode.org/arrangements/CactusUtils/Formaline/trunk@139 83718e91-0e4f-0410-abf4-91180603181f

1 files changed, 9 insertions, 0 deletions

diff --git a/src/rdf.cc b/src/rdf.cc
index c7dd7c2..186ec5c 100644
--- a/src/rdf.cc
+++ b/src/rdf.cc
@@ -127,6 +127,15 @@ namespace Formaline
       msgbuf << "\tcctk:pbsJobname=\"" << clean (pbsJobname) << "\"" << endl;
     }
     const char* pbsHost = getenv ("PBS_O_HOST");
+    if (not pbsHost) {
+      // check whether we are running on damiana where the MPI runtime system
+      // doesn't pass on PBS environment settings
+      if (strlen(hostbuf) == 21 &&
+          strncmp(hostbuf, "node", 4) == 0 &&
+          strncmp(hostbuf + 7, ".damiana.admin", 13) == 0) {
+        pbsHost = "damiana.damiana.admin";
+      }
+    }
     if (pbsHost) {
       // fix incomplete and/or strange PBS headnode hostnames
       if (strncmp(pbsHost, "peyote", 6) == 0) {