folder_realloc.c: Move interface to own file.

[nmh] / sbr / pidstatus.c

diff --git a/sbr/pidstatus.c b/sbr/pidstatus.c
index ded38edc15801a8299a7a5bfce203951430c6b66..ad3aed456c416987bae678a586dbddf3e4050c1b 100644 (file)
--- a/sbr/pidstatus.c
+++ b/sbr/pidstatus.c
@@ -1,21 +1,12 @@
-
-/*
- * pidstatus.c -- report child's status
+/* pidstatus.c -- report child's status

  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  * complete copyright information.
  */
 
  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  * complete copyright information.
  */
 

-#include <h/mh.h>
-
-#ifndef WTERMSIG
-# define WTERMSIG(s) ((int)((s) & 0x7F))
-#endif
-
-#ifndef WCOREDUMP
-# define WCOREDUMP(s) ((s) & 0x80)
-#endif
+#include "h/mh.h"
+#include "pidstatus.h"

 
 /*
  * Return 0 if the command exited with an exit code of zero, a nonzero code
 
 /*
  * Return 0 if the command exited with an exit code of zero, a nonzero code


@@ -28,45 +19,59 @@
 int
 pidstatus (int status, FILE *fp, char *cp)
 {
 int
 pidstatus (int status, FILE *fp, char *cp)
 {

-    int signum;
+    char *mesg;
+    int num;
+    bool lookup;

     char *signame;
 
     char *signame;
 

-/*
- * I have no idea what this is for (rc)
- * so I'm commenting it out for right now.
- *
- *  if ((status & 0xff00) == 0xff00)
- *      return status;
- */
-
-    /* If child process returned normally */

     if (WIFEXITED(status)) {
     if (WIFEXITED(status)) {

-       if ((signum = WEXITSTATUS(status))) {
+       status = WEXITSTATUS(status);
+       if (status) {

            if (cp)
                fprintf (fp, "%s: ", cp);
            if (cp)
                fprintf (fp, "%s: ", cp);

-           fprintf (fp, "exit %d\n", signum);
+           fprintf(fp, "exited %d\n", status);

        }
        }

-       return signum;
+       return status;

     }
 
     if (WIFSIGNALED(status)) {
     }
 
     if (WIFSIGNALED(status)) {

-       /* If child process terminated due to receipt of a signal */
-       signum = WTERMSIG(status);
-       if (signum != SIGINT) {
-           if (cp)
-               fprintf (fp, "%s: ", cp);
-           fprintf (fp, "signal %d", signum);
-           errno = 0;
-           signame = strsignal(signum);
-           if (errno)
-               signame = NULL;
-           if (signame)
-               fprintf (fp, " (%s%s)\n", signame,
-                        WCOREDUMP(status) ? ", core dumped" : "");
-           else
-               fprintf (fp, "%s\n", WCOREDUMP(status) ? " (core dumped)" : "");
-       }
+        mesg = "signalled";
+        num = WTERMSIG(status);
+       if (num == SIGINT)
+            return status;
+        lookup = true;
+    } else if (WIFSTOPPED(status)) {
+        mesg = "stopped";
+        num = WSTOPSIG(status);
+        lookup = true;
+    } else if (WIFCONTINUED(status)) {
+        mesg = "continued";
+        num = -1;
+        lookup = false;
+    } else {
+        mesg = "bizarre wait(2) status";
+        num = status;
+        lookup = false;
+    }
+
+    if (cp)
+        fprintf(fp, "%s: ", cp);
+    fputs(mesg, fp);
+
+    if (num != -1) {
+        fprintf(fp, " %#x", num);
+        if (lookup) {
+            errno = 0;
+            signame = strsignal(num);
+            if (errno)
+                signame = "invalid";
+            putc(' ', fp);
+            fputs(signame, fp);
+        }

     }
     }

+    if (WCOREDUMP(status))
+        fputs(", core dumped", fp);
+    putc('\n', fp);

 
     return status;
 }
 
     return status;
 }