mhshow: Automatically invoke (one) pager for the whole message, if on TTY.
[mmh] / uip / mhshow.c
index b43d5a8..c323867 100644 (file)
@@ -9,45 +9,31 @@
 #include <h/mh.h>
 #include <fcntl.h>
 #include <h/signals.h>
-#include <h/md5.h>
 #include <errno.h>
 #include <signal.h>
 #include <h/tws.h>
 #include <h/mime.h>
 #include <h/mhparse.h>
-#include <h/mhcachesbr.h>
 #include <h/utils.h>
 
 static struct swit switches[] = {
-#define CHECKSW  0
-       { "check", 0 },
-#define NCHECKSW  1
-       { "nocheck", 0 },
-#define SERIALSW  2
-       { "serialonly", 0 },
-#define NSERIALSW  3
-       { "noserialonly", 0 },
-#define VERBSW  4
+#define VERBSW  0
        { "verbose", 0 },
-#define NVERBSW  5
+#define NVERBSW  1
        { "noverbose", 0 },
-#define FILESW  6  /* interface from show */
+#define FILESW  2  /* interface from show */
        { "file file", 0 },
-#define FORMSW  7
+#define FORMSW  3
        { "form formfile", 0 },
-#define PARTSW  8
+#define PARTSW  4
        { "part number", 0 },
-#define TYPESW  9
+#define TYPESW  5
        { "type content", 0 },
-#define RCACHESW  10
-       { "rcache policy", 0 },
-#define WCACHESW  11
-       { "wcache policy", 0 },
-#define VERSIONSW  12
+#define VERSIONSW  6
        { "version", 0 },
-#define HELPSW  13
+#define HELPSW  7
        { "help", 0 },
-#define DEBUGSW  14
+#define DEBUGSW  8
        { "debug", -5 },
        { NULL, 0 }
 };
@@ -56,14 +42,7 @@ static struct swit switches[] = {
 /* mhparse.c */
 extern char *tmp;  /* directory to place temp files */
 
-/* mhcachesbr.c */
-extern int rcachesw;
-extern int wcachesw;
-extern char *cache_public;
-extern char *cache_private;
-
 /* mhshowsbr.c */
-extern int serialsw;
 extern int nolist;
 extern char *formsw;
 
@@ -100,12 +79,14 @@ void freects_done(int) NORETURN;
 ** static prototypes
 */
 static void pipeser(int);
+static void m_popen(char *);
+static void m_pclose(void);
 
 
 int
 main(int argc, char **argv)
 {
-       int msgnum, *icachesw;
+       int msgnum;
        char *cp, *file = NULL, *folder = NULL;
        char *maildir, buf[100], **argp;
        char **arguments;
@@ -113,6 +94,7 @@ main(int argc, char **argv)
        struct msgs *mp = NULL;
        CT ct, *ctp;
        FILE *fp;
+       int ontty = 0;
 
        done=freects_done;
 
@@ -147,40 +129,6 @@ main(int argc, char **argv)
                                print_version(invo_name);
                                done(1);
 
-                       case RCACHESW:
-                               icachesw = &rcachesw;
-                               goto do_cache;
-                       case WCACHESW:
-                               icachesw = &wcachesw;
-do_cache:
-                               if (!(cp = *argp++) || *cp == '-')
-                                       adios(NULL, "missing argument to %s",
-                                                       argp[-2]);
-                               switch (*icachesw = smatch(cp, caches)) {
-                               case AMBIGSW:
-                                       ambigsw(cp, caches);
-                                       done(1);
-                               case UNKWNSW:
-                                       adios(NULL, "%s unknown", cp);
-                               default:
-                                       break;
-                               }
-                               continue;
-
-                       case CHECKSW:
-                               checksw++;
-                               continue;
-                       case NCHECKSW:
-                               checksw = 0;
-                               continue;
-
-                       case SERIALSW:
-                               serialsw = 1;
-                               continue;
-                       case NSERIALSW:
-                               serialsw = 0;
-                               continue;
-
                        case PARTSW:
                                if (!(cp = *argp++) || *cp == '-')
                                        adios(NULL, "missing argument to %s",
@@ -266,15 +214,6 @@ do_cache:
                fclose(fp);
        }
 
-       /* Check for public cache location */
-       if ((cache_public = context_find(nmhcache)) && *cache_public != '/')
-               cache_public = NULL;
-
-       /* Check for private cache location */
-       if (!(cache_private = context_find(nmhprivcache)))
-               cache_private = ".cache";
-       cache_private = getcpy(toabsdir(cache_private));
-
        /*
        ** Check for storage directory.  If specified,
        ** then store temporary files there.  Else we
@@ -377,11 +316,19 @@ do_cache:
                }
        }
 
+       if ((ontty = isatty(fileno(stdout)))) {
+               m_popen(defaultpager);
+       }
+
        /*
        ** Show the message content
        */
        show_all_messages(cts);
 
+       if (ontty) {
+               m_pclose();
+       }
+
        /* Now free all the structures for the content */
        for (ctp = cts; *ctp; ctp++)
                free_content(*ctp);
@@ -415,3 +362,68 @@ pipeser(int i)
        done(1);
        /* NOTREACHED */
 }
+
+
+static int m_pid = NOTOK;
+static int sd = NOTOK;
+
+
+static void
+m_popen(char *name)
+{
+       int pd[2];
+
+       if ((sd = dup(fileno(stdout))) == NOTOK)
+               adios("standard output", "unable to dup()");
+
+       if (pipe(pd) == NOTOK)
+               adios("pipe", "unable to");
+
+       switch (m_pid = fork()) {
+       case NOTOK:
+               adios("fork", "unable to");
+
+       case OK:
+               SIGNAL(SIGINT, SIG_DFL);
+               SIGNAL(SIGQUIT, SIG_DFL);
+
+               close(pd[1]);
+               if (pd[0] != fileno(stdin)) {
+                       dup2(pd[0], fileno(stdin));
+                       close(pd[0]);
+               }
+               execlp(name, mhbasename(name), NULL);
+               fprintf(stderr, "unable to exec ");
+               perror(name);
+               _exit(-1);
+
+       default:
+               close(pd[0]);
+               if (pd[1] != fileno(stdout)) {
+                       dup2(pd[1], fileno(stdout));
+                       close(pd[1]);
+               }
+       }
+}
+
+
+void
+m_pclose(void)
+{
+       if (m_pid == NOTOK)
+               return;
+
+       if (sd != NOTOK) {
+               fflush(stdout);
+               if (dup2(sd, fileno(stdout)) == NOTOK)
+                       adios("standard output", "unable to dup2()");
+
+               clearerr(stdout);
+               close(sd);
+               sd = NOTOK;
+       } else
+               fclose(stdout);
+
+       pidwait(m_pid, OK);
+       m_pid = NOTOK;
+}