Changeset 4684 for trunk/Ohana/src/opihi/pantasks/kill.c

Timestamp:

Jul 31, 2005, 8:04:11 AM (21 years ago)

Author:

eugene

Message:

task/job list cleanup, fixing kill/delete

File:

• trunk/Ohana/src/opihi/pantasks/kill.c (modified) (1 diff)

trunk/Ohana/src/opihi/pantasks/kill.c

@@ -12 +12 @@
   JobID = atoi (argv[1]);
 
-  /* not yet implemented */
+  job = FindJob (JobID);
 
+  if (job[0].mode == JOB_LOCAL) {
+    if (!KillLocalJob (job)) {
+      job[0].state = JOB_HUNG;
+      if (VerboseMode()) fprintf (stderr, "child process %d is hung, cannot kill\n", job[0].pid);
+      return (FALSE);
+    }
+  } else {
+    if (!KillControllerJob (job)) {
+      job[0].state = JOB_HUNG;
+      if (VerboseMode()) fprintf (stderr, "child process %d is hung, cannot kill\n", job[0].pid);
+      return (FALSE);
+    }
+  }    
+    
   fprintf (stderr, "this function is not yet implemented\n");
   return (TRUE);