[padb] r334 committed - Migrate the 'local' sudo-resource-manager over from setup_pcmd...

[padb at googlecode.com]

Revision: 334
Author: apittman
Date: Wed Nov 25 06:00:09 2009
Log: Migrate the 'local' sudo-resource-manager over from setup_pcmd
to setup_job.

http://code.google.com/p/padb/source/detail?r=334

Modified:
  /trunk/src/padb

=======================================
--- /trunk/src/padb	Wed Nov 25 05:49:12 2009
+++ /trunk/src/padb	Wed Nov 25 06:00:09 2009
@@ -449,22 +449,21 @@
  $rmgr{local} = {
      get_active_jobs => \&local_get_jobs,
      job_is_running  => \&local_job_is_running,
-    setup_pcmd      => \&local_setup_pcmd,
-    find_pids       => \&local_find_pids,
+    setup_job       => \&local_setup_job,
  };

  $rmgr{'local-qsnet'} = {
      is_installed    => \&local_q_is_installed,
      get_active_jobs => \&local_q_get_jobs,
      job_is_running  => \&local_job_is_running,
-    setup_pcmd      => \&local_setup_pcmd,
+    setup_job       => \&local_setup_job,
      inner_rmgr      => 'local',
  };

  $rmgr{'local-fd'} = {
      get_active_jobs => \&local_fd_get_jobs,
      job_is_running  => \&local_job_is_running,
-    setup_pcmd      => \&local_setup_pcmd,
+    setup_job       => \&local_setup_job,
      inner_rmgr      => 'local',
  };

@@ -2533,8 +2532,16 @@
      return ( -d "/proc/$job" );
  }

-sub local_setup_pcmd {
-    return ( $EMPTY_STRING, 1, 1 );
+sub local_setup_job {
+    my $job = shift;
+
+    my $hostname = hostname();
+    my %pcmd;
+    $pcmd{nprocesses}                 = 1;
+    $pcmd{nhosts}                     = 1;
+    $pcmd{process_data}{$hostname}{0} = $job;
+    @{ $pcmd{host_list} } = $hostname;
+    return %pcmd;
  }

   
###############################################################################
@@ -8095,15 +8102,6 @@
      }
      return;
  }
-
-# Local processes per node, i.e. no resource manager support, we only have
-# one process in this case so call it process 0.
-sub local_find_pids {
-    my $pid = shift;
-
-    maybe_show_pid( 0, $pid );
-    return;
-}

  #
  # PBS support