Alter HasSuffixC()'s char * to be const.

[nmh] / uip / mhshowsbr.c

diff --git a/uip/mhshowsbr.c b/uip/mhshowsbr.c
index 68a07f7bdd5e6e86862df3cd016c839e29e880b6..8dbc2ecc0d85258ef540172173b2d815f6043673 100644 (file)
--- a/uip/mhshowsbr.c
+++ b/uip/mhshowsbr.c
@@ -11,7 +11,6 @@
 #include <fcntl.h>
 #include <h/signals.h>
 #include <h/md5.h>
 #include <fcntl.h>
 #include <h/signals.h>
 #include <h/md5.h>

-#include <setjmp.h>

 #include <h/mts.h>
 #include <h/tws.h>
 #include <h/mime.h>
 #include <h/mts.h>
 #include <h/tws.h>
 #include <h/mime.h>


@@ -23,6 +22,8 @@
 #endif /* ! HAVE_ICONV */
 
 extern int debugsw;
 #endif /* ! HAVE_ICONV */
 
 extern int debugsw;

+extern int npart;
+extern int ntype;

 
 int nolist   = 0;
 
 
 int nolist   = 0;
 


@@ -32,38 +33,42 @@ char *progsw = NULL;
 int nomore   = 0;
 char *formsw = NULL;
 
 int nomore   = 0;
 char *formsw = NULL;
 

+/* for output markerss and headers */
+char *folder = NULL;
+char *markerform;
+char *headerform;
+int headersw = -1;
+

 
 /* mhmisc.c */
 
 /* mhmisc.c */

-int part_ok (CT, int);
+int part_ok (CT);
+int part_exact (CT);

 int type_ok (CT, int);
 void content_error (char *, CT, char *, ...);
 void flush_errors (void);
 
 int type_ok (CT, int);
 void content_error (char *, CT, char *, ...);
 void flush_errors (void);
 

-/*
- * prototypes
- */
-int show_content_aux (CT, int, char *, char *);
-

 /*
  * static prototypes
  */
 static void show_single_message (CT, char *, int, int, int, struct format *);
 static void DisplayMsgHeader (CT, char *, int);
 static int show_switch (CT, int, int, int, int, struct format *);
 /*
  * static prototypes
  */
 static void show_single_message (CT, char *, int, int, int, struct format *);
 static void DisplayMsgHeader (CT, char *, int);
 static int show_switch (CT, int, int, int, int, struct format *);

-static int show_content (CT, int, int, int, struct format *fmt);
-static int show_content_aux2 (CT, int, char *, char *, int, int, int);
-static int show_text (CT, int, int);
+static int show_content (CT, int, int, int, struct format *);
+static int show_content_aux2 (CT, int, char *, char *, int, int, int, struct format *);
+static int show_text (CT, int, int, struct format *);

 static int show_multi (CT, int, int, int, int, struct format *);
 static int show_multi (CT, int, int, int, int, struct format *);

-static int show_multi_internal (CT, int, int, int, int, struct format *fmt);
-static int show_multi_aux (CT, int, char *);
-static int show_message_rfc822 (CT, int);
+static int show_multi_internal (CT, int, int, int, int, struct format *);
+static int show_multi_aux (CT, int, char *, struct format *);
+static int show_message_rfc822 (CT, int, struct format *);

 static int show_partial (CT, int);
 static int show_external (CT, int, int, int, int, struct format *);
 static int parse_display_string (CT, char *, int *, int *, char *, char *,
                                 size_t, int multipart);
 static int convert_content_charset (CT, char **);
 static int show_partial (CT, int);
 static int show_external (CT, int, int, int, int, struct format *);
 static int parse_display_string (CT, char *, int *, int *, char *, char *,
                                 size_t, int multipart);
 static int convert_content_charset (CT, char **);

+static struct format *compile_header(char *);

 static struct format *compile_marker(char *);
 static struct format *compile_marker(char *);

-static void output_marker (CT, struct format *);
+static void output_header (CT, struct format *);
+static void output_marker (CT, struct format *, int);

 static void free_markercomps (void);
 static int pidcheck(int);
 
 static void free_markercomps (void);
 static int pidcheck(int);
 


@@ -72,6 +77,7 @@ static int pidcheck(int);
  * content marker display.
  */
 
  * content marker display.
  */
 

+static struct comp *folder_comp = NULL;

 static struct comp *part_comp = NULL;
 static struct comp *ctype_comp = NULL;
 static struct comp *description_comp = NULL;
 static struct comp *part_comp = NULL;
 static struct comp *ctype_comp = NULL;
 static struct comp *description_comp = NULL;


@@ -92,11 +98,10 @@ static struct param_comp_list *dispo_pc_list = NULL;
  */
 
 void
  */
 
 void

-show_all_messages (CT *cts, int concatsw, int textonly, int inlineonly,
-                  char *markerform)
+show_all_messages (CT *cts, int concatsw, int textonly, int inlineonly)

 {
     CT ct, *ctp;
 {
     CT ct, *ctp;

-    struct format *fmt;
+    struct format *hfmt, *mfmt;

 
     /*
      * If form is not specified, then get default form
 
     /*
      * If form is not specified, then get default form


@@ -106,9 +111,10 @@ show_all_messages (CT *cts, int concatsw, int textonly, int inlineonly,
        formsw = getcpy (etcpath ("mhl.headers"));
 
     /*
        formsw = getcpy (etcpath ("mhl.headers"));
 
     /*

-     * Compile the content marker format line
+     * Compile the content marker and header format lines

      */
      */

-    fmt = compile_marker(markerform);
+    mfmt = compile_marker(markerform);
+    hfmt = compile_header(headerform);

 
     /*
      * If form is "mhl.null", suppress display of header.
 
     /*
      * If form is "mhl.null", suppress display of header.


@@ -120,13 +126,17 @@ show_all_messages (CT *cts, int concatsw, int textonly, int inlineonly,
        ct = *ctp;
 
        /* if top-level type is ok, then display message */
        ct = *ctp;
 
        /* if top-level type is ok, then display message */

-       if (type_ok (ct, 1))
+       if (type_ok (ct, 1)) {
+           if (headersw) output_header(ct, hfmt);
+

            show_single_message (ct, formsw, concatsw, textonly, inlineonly,
            show_single_message (ct, formsw, concatsw, textonly, inlineonly,

-                                fmt);
+                                mfmt);
+       }

     }
 
     free_markercomps();
     }
 
     free_markercomps();

-    fmt_free(fmt, 1);
+    fmt_free(hfmt, 1);
+    fmt_free(mfmt, 1);

 }
 
 
 }
 
 


@@ -140,7 +150,7 @@ show_single_message (CT ct, char *form, int concatsw, int textonly,
 {
     sigset_t set, oset;
 
 {
     sigset_t set, oset;
 

-    int status;
+    int status = OK;

 
     /* Allow user executable bit so that temporary directories created by
      * the viewer (e.g., lynx) are going to be accessible */
 
     /* Allow user executable bit so that temporary directories created by
      * the viewer (e.g., lynx) are going to be accessible */


@@ -196,9 +206,9 @@ DisplayMsgHeader (CT ct, char *form, int concatsw)
     char *file;
 
     vec = argsplit(mhlproc, &file, &vecp);
     char *file;
 
     vec = argsplit(mhlproc, &file, &vecp);

-    vec[vecp++] = getcpy("-form");
-    vec[vecp++] = getcpy(form);
-    vec[vecp++] = getcpy("-nobody");
+    vec[vecp++] = mh_xstrdup("-form");
+    vec[vecp++] = mh_xstrdup(form);
+    vec[vecp++] = mh_xstrdup("-nobody");

     vec[vecp++] = getcpy(ct->c_file);
 
     /*
     vec[vecp++] = getcpy(ct->c_file);
 
     /*


@@ -206,10 +216,10 @@ DisplayMsgHeader (CT ct, char *form, int concatsw)
      * then just pass that along.
      */
     if (nomore || concatsw) {
      * then just pass that along.
      */
     if (nomore || concatsw) {

-       vec[vecp++] = getcpy("-nomoreproc");
+       vec[vecp++] = mh_xstrdup("-nomoreproc");

     } else if (progsw) {
     } else if (progsw) {

-       vec[vecp++] = getcpy("-moreproc");
-       vec[vecp++] = getcpy(progsw);
+       vec[vecp++] = mh_xstrdup("-moreproc");
+       vec[vecp++] = mh_xstrdup(progsw);

     }
     vec[vecp] = NULL;
 
     }
     vec[vecp] = NULL;
 


@@ -263,21 +273,26 @@ show_switch (CT ct, int alternate, int concatsw, int textonly, int inlineonly,
                                          inlineonly, fmt);
 
                case MESSAGE_RFC822:
                                          inlineonly, fmt);
 
                case MESSAGE_RFC822:

+                   return show_message_rfc822 (ct, alternate, fmt);
+
+               /*
+                * Treat unknown message types as equivalent to
+                * application/octet-stream for now
+                */

                default:
                default:

-                   return show_message_rfc822 (ct, alternate);
+                   return show_content (ct, alternate, textonly,
+                                        inlineonly, fmt);

            }
 
        case CT_TEXT:
            }
 
        case CT_TEXT:

-           return show_text (ct, alternate, concatsw);
+           return show_text (ct, alternate, concatsw, fmt);

 
        case CT_AUDIO:
        case CT_IMAGE:
        case CT_VIDEO:
        case CT_APPLICATION:
 
        case CT_AUDIO:
        case CT_IMAGE:
        case CT_VIDEO:
        case CT_APPLICATION:

-           return show_content (ct, alternate, textonly, inlineonly, fmt);
-

        default:
        default:

-           adios (NULL, "unknown content type %d", ct->c_type);
+           return show_content (ct, alternate, textonly, inlineonly, fmt);

     }
 
     return 0;  /* NOT REACHED */
     }
 
     return 0;  /* NOT REACHED */


@@ -292,7 +307,7 @@ static int
 show_content (CT ct, int alternate, int textonly, int inlineonly,
              struct format *fmt)
 {
 show_content (CT ct, int alternate, int textonly, int inlineonly,
              struct format *fmt)
 {

-    char *cp, buffer[BUFSIZ];
+    char *cp;

     CI ci = &ct->c_ctinfo;
 
     /*
     CI ci = &ct->c_ctinfo;
 
     /*


@@ -300,24 +315,17 @@ show_content (CT ct, int alternate, int textonly, int inlineonly,
      * the content-type.
      */
 
      * the content-type.
      */
 

-    if (textonly || (inlineonly && is_inline(ct))) {
-       output_marker(ct, fmt);
+    if (textonly || (inlineonly && !is_inline(ct))) {
+       output_marker(ct, fmt, 1);

        return OK;
     }
 
        return OK;
     }
 

-    /* Check for invo_name-show-type/subtype */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s/%s",
-               invo_name, ci->ci_type, ci->ci_subtype);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
-
-    /* Check for invo_name-show-type */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s", invo_name, ci->ci_type);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
+    /* Check for invo_name-show-type[/subtype] */
+    if ((cp = context_find_by_type ("show", ci->ci_type, ci->ci_subtype)))
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

 
     if ((cp = ct->c_showproc))
 
     if ((cp = ct->c_showproc))

-       return show_content_aux (ct, alternate, cp, NULL);
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

 
     /* complain if we are not a part of a multipart/alternative */
     if (!alternate)
 
     /* complain if we are not a part of a multipart/alternative */
     if (!alternate)


@@ -332,11 +340,11 @@ show_content (CT ct, int alternate, int textonly, int inlineonly,
  */
 
 int
  */
 
 int

-show_content_aux (CT ct, int alternate, char *cp, char *cracked)
+show_content_aux (CT ct, int alternate, char *cp, char *cracked, struct format *fmt)

 {
     int fd;
     int xstdin = 0, xlist = 0;
 {
     int fd;
     int xstdin = 0, xlist = 0;

-    char *file, buffer[BUFSIZ];
+    char *file = NULL, buffer[BUFSIZ];

 
     if (!ct->c_ceopenfnx) {
        if (!alternate)
 
     if (!ct->c_ceopenfnx) {
        if (!alternate)


@@ -345,11 +353,10 @@ show_content_aux (CT ct, int alternate, char *cp, char *cracked)
        return NOTOK;
     }
 
        return NOTOK;
     }
 

-    file = NULL;

     if ((fd = (*ct->c_ceopenfnx) (ct, &file)) == NOTOK)
        return NOTOK;
     if (ct->c_showproc && !strcmp (ct->c_showproc, "true"))
     if ((fd = (*ct->c_ceopenfnx) (ct, &file)) == NOTOK)
        return NOTOK;
     if (ct->c_showproc && !strcmp (ct->c_showproc, "true"))

-       return (alternate ? DONE : OK);
+       return OK;

 
     if (! strcmp(invo_name, "mhshow")  &&
         ct->c_type == CT_TEXT  &&  ct->c_subtype == TEXT_PLAIN) {
 
     if (! strcmp(invo_name, "mhshow")  &&
         ct->c_type == CT_TEXT  &&  ct->c_subtype == TEXT_PLAIN) {


@@ -358,14 +365,16 @@ show_content_aux (CT ct, int alternate, char *cp, char *cracked)
            some code rearrangement.  And to make this really ugly,
            only do it in mhshow, not mhfixmsg, mhn, or mhstore. */
         if (convert_content_charset (ct, &file) == OK) {
            some code rearrangement.  And to make this really ugly,
            only do it in mhshow, not mhfixmsg, mhn, or mhstore. */
         if (convert_content_charset (ct, &file) == OK) {

-            close_encoding (ct);
+            (*ct->c_ceclosefnx) (ct);

             if ((fd = (*ct->c_ceopenfnx) (ct, &file)) == NOTOK)
                 return NOTOK;
         } else {
             if ((fd = (*ct->c_ceopenfnx) (ct, &file)) == NOTOK)
                 return NOTOK;
         } else {

-            admonish (NULL, "unable to convert character set%s to %s",
-                      ct->c_partno  ?  "of part "  :  "",
+            char *charset = content_charset (ct);
+            admonish (NULL, "unable to convert character set%s%s from %s",
+                      ct->c_partno  ?  " of part "  :  "",

                       ct->c_partno  ?  ct->c_partno  :  "",
                       ct->c_partno  ?  ct->c_partno  :  "",

-                      content_charset (ct));
+                      charset);
+            free (charset);

         }
     }
 
         }
     }
 


@@ -382,7 +391,7 @@ show_content_aux (CT ct, int alternate, char *cp, char *cracked)
 
 got_command:
     return show_content_aux2 (ct, alternate, cracked, buffer,
 
 got_command:
     return show_content_aux2 (ct, alternate, cracked, buffer,

-                             fd, xlist, xstdin);
+                             fd, xlist, xstdin, fmt);

 }
 
 
 }
 
 


@@ -392,7 +401,7 @@ got_command:
 
 static int
 show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
 
 static int
 show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,

-                   int fd, int xlist, int xstdin)
+                   int fd, int xlist, int xstdin, struct format *fmt)

 {
     pid_t child_id;
     int i, vecp;
 {
     pid_t child_id;
     int i, vecp;


@@ -411,11 +420,8 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
            fprintf (stderr, " using command %s\n", buffer);
     }
 
            fprintf (stderr, " using command %s\n", buffer);
     }
 

-    if (xlist) {
-       if (ct->c_type == CT_MULTIPART)
-           list_content (ct, -1, 1, 0, 0, 0);
-       else
-           list_switch (ct, -1, 1, 0, 0, 0);
+    if (xlist && fmt) {
+       output_marker(ct, fmt, 0);

     }
 
     /*
     }
 
     /*


@@ -426,6 +432,7 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
     if (buffer[0] == '\0') {
        char readbuf[BUFSIZ];
        ssize_t cc;
     if (buffer[0] == '\0') {
        char readbuf[BUFSIZ];
        ssize_t cc;

+       char lastchar = '\n';

 
        if (fd == NOTOK) {
            advise(NULL, "Cannot use NULL command to display content-type "
 
        if (fd == NOTOK) {
            advise(NULL, "Cannot use NULL command to display content-type "


@@ -434,7 +441,10 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
        }
 
        while ((cc = read(fd, readbuf, sizeof(readbuf))) > 0) {
        }
 
        while ((cc = read(fd, readbuf, sizeof(readbuf))) > 0) {

-           fwrite(readbuf, sizeof(char), cc, stdout);
+           if ((ssize_t) fwrite(readbuf, sizeof(char), cc, stdout) < cc) {
+               advise ("putline", "fwrite");
+           }
+           lastchar = readbuf[cc - 1];

        }
 
        if (cc < 0) {
        }
 
        if (cc < 0) {


@@ -442,6 +452,20 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
            return NOTOK;
        }
 
            return NOTOK;
        }
 

+       /*
+        * The MIME standards allow content to not have a trailing newline.
+        * But because we are (presumably) sending this to stdout, include
+        * a newline for text content if the final character was not a
+        * newline.  Only do this for mhshow.
+        */
+
+       if (strcmp(invo_name, "mhshow") == 0 && ct->c_type == CT_TEXT &&
+           ct->c_subtype == TEXT_PLAIN && lastchar != '\n') {
+           putc('\n', stdout);
+       }
+
+       fflush(stdout);
+

        return OK;
     }
 
        return OK;
     }
 


@@ -459,25 +483,31 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
            return NOTOK;
 
        case OK:
            return NOTOK;
 
        case OK:

-           if (cracked)
-               chdir (cracked);
+           if (cracked) {
+               if (chdir (cracked) < 0) {
+                   advise (cracked, "chdir");
+               }
+           }

            if (!xstdin)
                dup2 (fd, 0);
            close (fd);
            execvp (file, vec);
            fprintf (stderr, "unable to exec ");
            if (!xstdin)
                dup2 (fd, 0);
            close (fd);
            execvp (file, vec);
            fprintf (stderr, "unable to exec ");

-           perror ("/bin/sh");
+           perror (buffer);

            _exit (-1);
            /* NOTREACHED */
 
            _exit (-1);
            /* NOTREACHED */
 

-       default:
+       default: {
+           int status;
+

            arglist_free(file, vec);
 
            arglist_free(file, vec);
 

-           pidcheck (pidXwait (child_id, NULL));
+           pidcheck ((status = pidXwait (child_id, NULL)));

 
            if (fd != NOTOK)
                (*ct->c_ceclosefnx) (ct);
 
            if (fd != NOTOK)
                (*ct->c_ceclosefnx) (ct);

-           return (alternate ? DONE : OK);
+           return (alternate ? OK : status);
+        }

     }
 }
 
     }
 }
 


@@ -487,34 +517,30 @@ show_content_aux2 (CT ct, int alternate, char *cracked, char *buffer,
  */
 
 static int
  */
 
 static int

-show_text (CT ct, int alternate, int concatsw)
+show_text (CT ct, int alternate, int concatsw, struct format *fmt)

 {
     char *cp, buffer[BUFSIZ];
     CI ci = &ct->c_ctinfo;
 
 {
     char *cp, buffer[BUFSIZ];
     CI ci = &ct->c_ctinfo;
 

-    /* Check for invo_name-show-type/subtype */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s/%s",
-               invo_name, ci->ci_type, ci->ci_subtype);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
-
-    /* Check for invo_name-show-type */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s", invo_name, ci->ci_type);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
+    /* Check for invo_name-show-type[/subtype] */
+    if ((cp = context_find_by_type ("show", ci->ci_type, ci->ci_subtype)))
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

 
     /*
      * Use default method if content is text/plain, or if
      * if it is not a text part of a multipart/alternative
      */
     if (!alternate || ct->c_subtype == TEXT_PLAIN) {
 
     /*
      * Use default method if content is text/plain, or if
      * if it is not a text part of a multipart/alternative
      */
     if (!alternate || ct->c_subtype == TEXT_PLAIN) {

-       if (concatsw)
-           snprintf(buffer, sizeof(buffer), "%%l");
-       else
+       if (concatsw) {
+           if (ct->c_termproc)
+               snprintf(buffer, sizeof(buffer), "%%lcat");
+           else
+               snprintf(buffer, sizeof(buffer), "%%l");
+       } else

            snprintf (buffer, sizeof(buffer), "%%l%s %%F", progsw ? progsw :
                      moreproc && *moreproc ? moreproc : DEFAULT_PAGER);
        cp = (ct->c_showproc = add (buffer, NULL));
            snprintf (buffer, sizeof(buffer), "%%l%s %%F", progsw ? progsw :
                      moreproc && *moreproc ? moreproc : DEFAULT_PAGER);
        cp = (ct->c_showproc = add (buffer, NULL));

-       return show_content_aux (ct, alternate, cp, NULL);
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

     }
 
     return NOTOK;
     }
 
     return NOTOK;


@@ -529,22 +555,16 @@ static int
 show_multi (CT ct, int alternate, int concatsw, int textonly, int inlineonly,
            struct format *fmt)
 {
 show_multi (CT ct, int alternate, int concatsw, int textonly, int inlineonly,
            struct format *fmt)
 {

-    char *cp, buffer[BUFSIZ];
+    char *cp;

     CI ci = &ct->c_ctinfo;
 
     CI ci = &ct->c_ctinfo;
 

-    /* Check for invo_name-show-type/subtype */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s/%s",
-               invo_name, ci->ci_type, ci->ci_subtype);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_multi_aux (ct, alternate, cp);
+    /* Check for invo_name-show-type[/subtype] */
+    if ((cp = context_find_by_type ("show", ci->ci_type, ci->ci_subtype)))
+       return show_multi_aux (ct, alternate, cp, fmt);

 
 

-    /* Check for invo_name-show-type */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s", invo_name, ci->ci_type);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_multi_aux (ct, alternate, cp);
-
-    if ((cp = ct->c_showproc))
-       return show_multi_aux (ct, alternate, cp);
+    if ((cp = ct->c_showproc)) {
+       return show_multi_aux (ct, alternate, cp, fmt);
+    }

 
     /*
      * Use default method to display this multipart content.  Even
 
     /*
      * Use default method to display this multipart content.  Even


@@ -568,6 +588,10 @@ show_multi_internal (CT ct, int alternate, int concatsw, int textonly,
     int        alternating, nowalternate, result;
     struct multipart *m = (struct multipart *) ct->c_ctparams;
     struct part *part;
     int        alternating, nowalternate, result;
     struct multipart *m = (struct multipart *) ct->c_ctparams;
     struct part *part;

+    int request_matched;
+    int display_success;
+    int mult_alt_done;
+    int ret;

     CT p;
 
     alternating = 0;
     CT p;
 
     alternating = 0;


@@ -578,39 +602,58 @@ show_multi_internal (CT ct, int alternate, int concatsw, int textonly,
        alternating  = 1;
     }
 
        alternating  = 1;
     }
 

-/*
- * alternate   -> we are a part inside an multipart/alternative
- * alternating -> we are a multipart/alternative
- */
+    /*
+     * alternate   -> we are a part inside a multipart/alternative
+     * alternating -> we are a multipart/alternative
+     */

 
 

-    result = alternate ? NOTOK : OK;
+    result = NOTOK;
+    request_matched = 0;
+    display_success = 0;
+    mult_alt_done = 0;

 
     for (part = m->mp_parts; part; part = part->mp_next) {
        p = part->mp_part;
 
 
     for (part = m->mp_parts; part; part = part->mp_next) {
        p = part->mp_part;
 

-       if (part_ok (p, 1) && type_ok (p, 1)) {
+       /* while looking for the right displayable alternative, we
+        * use a looser search criterion than we do after finding it.
+        * specifically, while still looking, part_ok() will match
+        * "parent" parts (e.g.  "-part 2" where 2 is a high-level
+        * multipart).  after finding it, we use part_exact() to only
+        * choose a part that was requested explicitly.
+        */
+       if ((part_exact(p) && type_ok(p, 1)) ||
+               (!mult_alt_done && part_ok (p) && type_ok (p, 1))) {
+

            int inneresult;
 
            inneresult = show_switch (p, nowalternate, concatsw, textonly,
                                      inlineonly, fmt);
            switch (inneresult) {
            int inneresult;
 
            inneresult = show_switch (p, nowalternate, concatsw, textonly,
                                      inlineonly, fmt);
            switch (inneresult) {

-               case NOTOK:
+               case NOTOK:  /* hard display error */
+                   request_matched = 1;

                    if (alternate && !alternating) {
                        result = NOTOK;
                        goto out;
                    }
                    continue;
 
                    if (alternate && !alternating) {
                        result = NOTOK;
                        goto out;
                    }
                    continue;
 

-               case OK:
-               case DONE:
+               case DONE:  /* found no match on content type */
+                   continue;
+
+               case OK:  /* display successful */
+                   request_matched = 1;
+                   display_success = 1;
+                   result = OK;
+
+                   /* if we got success on a sub-part of
+                    * multipart/alternative, we're done, unless
+                    * there's a chance an explicit part should be
+                    * matched later in the alternatives.  */

                    if (alternating) {
                    if (alternating) {

-                       result = DONE;
-                       break;
-                   }
-                   if (alternate) {
+                       mult_alt_done = 1;
+                   } else if (alternate) {

                        alternate = nowalternate = 0;
                        alternate = nowalternate = 0;

-                       if (result == NOTOK)
-                           result = inneresult;

                    }
                    continue;
            }
                    }
                    continue;
            }


@@ -618,15 +661,23 @@ show_multi_internal (CT ct, int alternate, int concatsw, int textonly,
        }
     }
 
        }
     }
 

-    if (alternating && !part) {
+    /* we're supposed to be displaying at least something from a
+     * multipart/alternative.  if we've had parts to consider, and
+     * we've had no success, then we should complain.  we shouldn't
+     * complain if none of the parts matched any -part or -type option.
+     */
+    if (alternating && request_matched && !display_success) {
+       /* if we're ourselves an alternate.  don't complain yet. */

        if (!alternate)
            content_error (NULL, ct, "don't know how to display any of the contents");
        result = NOTOK;
        if (!alternate)
            content_error (NULL, ct, "don't know how to display any of the contents");
        result = NOTOK;

-       goto out;

     }
 
 out:
     }
 
 out:

-    return result;
+    /* if no parts matched what was requested, there can't have been
+     * any display errors.  we report DONE rather than OK. */
+    ret = request_matched ? result : DONE;
+    return ret;

 }
 
 
 }
 
 


@@ -636,12 +687,12 @@ out:
  */
 
 static int
  */
 
 static int

-show_multi_aux (CT ct, int alternate, char *cp)
+show_multi_aux (CT ct, int alternate, char *cp, struct format *fmt)

 {
     /* xstdin is only used in the call to parse_display_string():
        its value is ignored in the function. */
     int xstdin = 0, xlist = 0;
 {
     /* xstdin is only used in the call to parse_display_string():
        its value is ignored in the function. */
     int xstdin = 0, xlist = 0;

-    char *file, buffer[BUFSIZ];
+    char *file = NULL, buffer[BUFSIZ];

     struct multipart *m = (struct multipart *) ct->c_ctparams;
     struct part *part;
     CT p;
     struct multipart *m = (struct multipart *) ct->c_ctparams;
     struct part *part;
     CT p;


@@ -656,14 +707,13 @@ show_multi_aux (CT ct, int alternate, char *cp)
        }
 
        if (p->c_storage == NULL) {
        }
 
        if (p->c_storage == NULL) {

-           file = NULL;

            if ((*p->c_ceopenfnx) (p, &file) == NOTOK)
                return NOTOK;
 
            p->c_storage = add (file, NULL);
 
            if (p->c_showproc && !strcmp (p->c_showproc, "true"))
            if ((*p->c_ceopenfnx) (p, &file) == NOTOK)
                return NOTOK;
 
            p->c_storage = add (file, NULL);
 
            if (p->c_showproc && !strcmp (p->c_showproc, "true"))

-               return (alternate ? DONE : OK);
+               return OK;

            (*p->c_ceclosefnx) (p);
        }
     }
            (*p->c_ceclosefnx) (p);
        }
     }


@@ -674,7 +724,7 @@ show_multi_aux (CT ct, int alternate, char *cp)
        return NOTOK;
     }
 
        return NOTOK;
     }
 

-    return show_content_aux2 (ct, alternate, NULL, buffer, NOTOK, xlist, 0);
+    return show_content_aux2 (ct, alternate, NULL, buffer, NOTOK, xlist, 0, fmt);

 }
 
 
 }
 
 


@@ -683,29 +733,22 @@ show_multi_aux (CT ct, int alternate, char *cp)
  */
 
 static int
  */
 
 static int

-show_message_rfc822 (CT ct, int alternate)
+show_message_rfc822 (CT ct, int alternate, struct format *fmt)

 {
 {

-    char *cp, buffer[BUFSIZ];
+    char *cp;

     CI ci = &ct->c_ctinfo;
 
     CI ci = &ct->c_ctinfo;
 

-    /* Check for invo_name-show-type/subtype */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s/%s",
-               invo_name, ci->ci_type, ci->ci_subtype);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
-
-    /* Check for invo_name-show-type */
-    snprintf (buffer, sizeof(buffer), "%s-show-%s", invo_name, ci->ci_type);
-    if ((cp = context_find (buffer)) && *cp != '\0')
-       return show_content_aux (ct, alternate, cp, NULL);
+    /* Check for invo_name-show-type[/subtype] */
+    if ((cp = context_find_by_type ("show", ci->ci_type, ci->ci_subtype)))
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

 
     if ((cp = ct->c_showproc))
 
     if ((cp = ct->c_showproc))

-       return show_content_aux (ct, alternate, cp, NULL);
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

 
     /* default method for message/rfc822 */
     if (ct->c_subtype == MESSAGE_RFC822) {
 
     /* default method for message/rfc822 */
     if (ct->c_subtype == MESSAGE_RFC822) {

-       cp = (ct->c_showproc = add ("%pecho -file %F", NULL));
-       return show_content_aux (ct, alternate, cp, NULL);
+       cp = (ct->c_showproc = add ("%pshow -file %F", NULL));
+       return show_content_aux (ct, alternate, cp, NULL, fmt);

     }
 
     /* complain if we are not a part of a multipart/alternative */
     }
 
     /* complain if we are not a part of a multipart/alternative */


@@ -1023,16 +1066,7 @@ convert_charset (CT ct, char *dest_charset, int *message_mods) {
     char *src_charset = content_charset (ct);
     int status = OK;
 
     char *src_charset = content_charset (ct);
     int status = OK;
 

-    /* norm_charmap() is case sensitive. */
-    char *src_charset_u = upcase (src_charset);
-    char *dest_charset_u = upcase (dest_charset);
-    int different_charsets =
-        strcmp (norm_charmap (src_charset), norm_charmap (dest_charset));
-
-    free (dest_charset_u);
-    free (src_charset_u);
-
-    if (different_charsets) {
+    if (strcasecmp (src_charset, dest_charset)) {

 #ifdef HAVE_ICONV
         iconv_t conv_desc = NULL;
         char *dest;
 #ifdef HAVE_ICONV
         iconv_t conv_desc = NULL;
         char *dest;


@@ -1043,12 +1077,16 @@ convert_charset (CT ct, char *dest_charset, int *message_mods) {
         size_t end;
         int opened_input_file = 0;
         char src_buffer[BUFSIZ];
         size_t end;
         int opened_input_file = 0;
         char src_buffer[BUFSIZ];

+       size_t dest_buffer_size = BUFSIZ;
+       char *dest_buffer = mh_xmalloc(dest_buffer_size);

         HF hf;
         char *tempfile;
         HF hf;
         char *tempfile;

+       int fromutf8 = !strcasecmp(src_charset, "UTF-8");

 
         if ((conv_desc = iconv_open (dest_charset, src_charset)) ==
             (iconv_t) -1) {
             advise (NULL, "Can't convert %s to %s", src_charset, dest_charset);
 
         if ((conv_desc = iconv_open (dest_charset, src_charset)) ==
             (iconv_t) -1) {
             advise (NULL, "Can't convert %s to %s", src_charset, dest_charset);

+            free (src_charset);

             return NOTOK;
         }
 
             return NOTOK;
         }
 


@@ -1089,20 +1127,63 @@ convert_charset (CT ct, char *dest_charset, int *message_mods) {
             while ((inbytes = fread (src_buffer, 1,
                                      min (bytes_to_read, sizeof src_buffer),
                                      *fp)) > 0) {
             while ((inbytes = fread (src_buffer, 1,
                                      min (bytes_to_read, sizeof src_buffer),
                                      *fp)) > 0) {

-                char dest_buffer[BUFSIZ];

                 ICONV_CONST char *ib = src_buffer;
                 char *ob = dest_buffer;
                 ICONV_CONST char *ib = src_buffer;
                 char *ob = dest_buffer;

-                size_t outbytes = sizeof dest_buffer;
+                size_t outbytes = dest_buffer_size;

                 size_t outbytes_before = outbytes;
 
                 if (end > 0) bytes_to_read -= inbytes;
 
                 size_t outbytes_before = outbytes;
 
                 if (end > 0) bytes_to_read -= inbytes;
 

+iconv_start:

                 if (iconv (conv_desc, &ib, &inbytes, &ob, &outbytes) ==
                     (size_t) -1) {
                 if (iconv (conv_desc, &ib, &inbytes, &ob, &outbytes) ==
                     (size_t) -1) {

+                   if (errno == E2BIG) {
+                       /*
+                        * Bump up the buffer by at least a factor of 2
+                        * over what we need.
+                        */
+                       size_t bumpup = inbytes * 2, ob_off = ob - dest_buffer;
+                       dest_buffer_size += bumpup;
+                       dest_buffer = mh_xrealloc(dest_buffer,
+                                                 dest_buffer_size);
+                       ob = dest_buffer + ob_off;
+                       outbytes += bumpup;
+                       outbytes_before += bumpup;
+                       goto iconv_start;
+                   }
+                   if (errno == EINVAL) {
+                       /* middle of multi-byte sequence */
+                       if (write (fd, dest_buffer, outbytes_before - outbytes) < 0) {
+                           advise (dest, "write");
+                       }
+                       fseeko (*fp, -inbytes, SEEK_CUR);
+                       if (end > 0) bytes_to_read += inbytes;
+                       /* advise(NULL, "convert_charset: EINVAL"); */
+                       continue;
+                   }
+                   if (errno == EILSEQ) {
+                       /* invalid multi-byte sequence */
+                       if (fromutf8) {
+                           for (++ib, --inbytes;
+                                inbytes > 0 &&
+                                       (((unsigned char) *ib) & 0xc0) == 0x80;
+                                ++ib, --inbytes)
+                               continue;
+                       } else {
+                           ib++; inbytes--; /* skip it */
+                       }
+                       (*ob++) = '?'; outbytes --;
+                       /* advise(NULL, "convert_charset: EILSEQ"); */
+                       goto iconv_start;
+                   }
+                   advise (NULL, "convert_charset: errno = %d", errno);

                     status = NOTOK;
                     break;
                 } else {
                     status = NOTOK;
                     break;
                 } else {

-                    write (fd, dest_buffer, outbytes_before - outbytes);
+                    if (write (fd, dest_buffer, outbytes_before - outbytes)
+                        < 0) {
+                        advise (dest, "write");
+                    }

                 }
             }
 
                 }
             }
 


@@ -1161,54 +1242,89 @@ convert_charset (CT ct, char *dest_charset, int *message_mods) {
         } else {
             (void) m_unlink (dest);
         }
         } else {
             (void) m_unlink (dest);
         }

+       free(dest_buffer);

 #else  /* ! HAVE_ICONV */
         NMH_UNUSED (message_mods);
 
         advise (NULL, "Can't convert %s to %s without iconv", src_charset,
                 dest_charset);
 #else  /* ! HAVE_ICONV */
         NMH_UNUSED (message_mods);
 
         advise (NULL, "Can't convert %s to %s without iconv", src_charset,
                 dest_charset);

+        errno = ENOSYS;

         status = NOTOK;
 #endif /* ! HAVE_ICONV */
     }
 
         status = NOTOK;
 #endif /* ! HAVE_ICONV */
     }
 

+    free (src_charset);

     return status;
 }
 
 
 static int
 convert_content_charset (CT ct, char **file) {
     return status;
 }
 
 
 static int
 convert_content_charset (CT ct, char **file) {

+    int status = OK;
+

 #ifdef HAVE_ICONV
     /* Using current locale, see if the content needs to be converted. */
 
     /* content_charset() cannot return NULL. */
 #ifdef HAVE_ICONV
     /* Using current locale, see if the content needs to be converted. */
 
     /* content_charset() cannot return NULL. */

-    char *charset = content_charset (ct);
+    char *src_charset = content_charset (ct);

 
 

-    if (! check_charset (charset, strlen (charset))) {
+    if (! check_charset (src_charset, strlen (src_charset))) {

         int unused = 0;
 
         int unused = 0;
 

-        if (convert_charset (ct, get_charset (), &unused) == 0) {
+        char *dest_charset = getcpy (get_charset ());
+
+        if (convert_charset (ct, dest_charset, &unused) == 0) {

             *file = ct->c_cefile.ce_file;
         } else {
             *file = ct->c_cefile.ce_file;
         } else {

-            return NOTOK;
+            status = NOTOK;

         }
         }

+
+        free (dest_charset);

     }
     }

+    free (src_charset);

 #else  /* ! HAVE_ICONV */
     NMH_UNUSED (ct);
     NMH_UNUSED (file);
 #endif /* ! HAVE_ICONV */
 
 #else  /* ! HAVE_ICONV */
     NMH_UNUSED (ct);
     NMH_UNUSED (file);
 #endif /* ! HAVE_ICONV */
 

-    return OK;
+    return status;

 }
 
 /*
  * Compile our format string and save any parameters we care about.
  */
 
 }
 
 /*
  * Compile our format string and save any parameters we care about.
  */
 

-#define DEFAULT_MARKER "[ part %{part} - %{content-type} - %<{description}" \
-                      "%{description}%?{cdispo-filename}%{cdispo-filename}" \
-                      "%|%{ctype-name}%> ]"
+#define DEFAULT_HEADER "[ Message %{folder}%<{folder}:%>%(msg) ]"
+#define DEFAULT_MARKER "[ part %{part} - %{content-type} - " \
+                      "%<{description}%{description}" \
+                        "%?{cdispo-filename}%{cdispo-filename}" \
+                        "%|%{ctype-name}%>  " \
+                      "%(kilo(size))B %<(unseen)\\(suppressed\\)%> ]"
+
+static struct format *
+compile_header(char *form)
+{
+    struct format *fmt;
+    char *fmtstring;
+    struct comp *comp = NULL;
+    unsigned int bucket;
+
+    fmtstring = new_fs(form, NULL, DEFAULT_HEADER);
+
+    (void) fmt_compile(fmtstring, &fmt, 1);
+    free_fs();
+
+    while ((comp = fmt_nextcomp(comp, &bucket)) != NULL) {
+       if (strcasecmp(comp->c_name, "folder") == 0) {
+           folder_comp = comp;
+       }
+    }
+
+    return fmt;
+}

 
 static struct format *
 
 static struct format *

-compile_marker(char *markerform)
+compile_marker(char *form)

 {
     struct format *fmt;
     char *fmtstring;
 {
     struct format *fmt;
     char *fmtstring;


@@ -1216,10 +1332,10 @@ compile_marker(char *markerform)
     unsigned int bucket;
     struct param_comp_list *pc_entry;
 
     unsigned int bucket;
     struct param_comp_list *pc_entry;
 

-    fmtstring = new_fs(markerform, NULL, DEFAULT_MARKER);
+    fmtstring = new_fs(form, NULL, DEFAULT_MARKER);

 
     (void) fmt_compile(fmtstring, &fmt, 1);
 
     (void) fmt_compile(fmtstring, &fmt, 1);

-    free(fmtstring);
+    free_fs();

 
     /*
      * Things we care about:
 
     /*
      * Things we care about:


@@ -1243,15 +1359,15 @@ compile_marker(char *markerform)
            dispo_comp = comp;
        } else if (strncasecmp(comp->c_name, "ctype-", 6) == 0 &&
                   strlen(comp->c_name) > 6) {
            dispo_comp = comp;
        } else if (strncasecmp(comp->c_name, "ctype-", 6) == 0 &&
                   strlen(comp->c_name) > 6) {

-           pc_entry = mh_xmalloc(sizeof(*pc_entry));
-           pc_entry->param = getcpy(comp->c_name + 6);
+           NEW(pc_entry);
+           pc_entry->param = mh_xstrdup(comp->c_name + 6);

            pc_entry->comp = comp;
            pc_entry->next = ctype_pc_list;
            ctype_pc_list = pc_entry;
        } else if (strncasecmp(comp->c_name, "cdispo-", 7) == 0 &&
                   strlen(comp->c_name) > 7) {
            pc_entry->comp = comp;
            pc_entry->next = ctype_pc_list;
            ctype_pc_list = pc_entry;
        } else if (strncasecmp(comp->c_name, "cdispo-", 7) == 0 &&
                   strlen(comp->c_name) > 7) {

-           pc_entry = mh_xmalloc(sizeof(*pc_entry));
-           pc_entry->param = getcpy(comp->c_name + 7);
+           NEW(pc_entry);
+           pc_entry->param = mh_xstrdup(comp->c_name + 7);

            pc_entry->comp = comp;
            pc_entry->next = dispo_pc_list;
            dispo_pc_list = pc_entry;
            pc_entry->comp = comp;
            pc_entry->next = dispo_pc_list;
            dispo_pc_list = pc_entry;


@@ -1266,11 +1382,45 @@ compile_marker(char *markerform)
  */
 
 static void
  */
 
 static void

-output_marker(CT ct, struct format *fmt)
+output_header(CT ct, struct format *fmt)
+{
+    charstring_t outbuf = charstring_create (BUFSIZ);
+    int dat[5] = { 0 };
+    char *endp;
+    int message = 0;
+
+    if (folder_comp)
+       folder_comp->c_text = getcpy(folder);
+
+    if (ct->c_file && *ct->c_file) {
+       message = strtol(ct->c_file, &endp, 10);
+       if (*endp) message = 0;
+       dat[0] = message;
+    }
+
+    /* it would be nice to populate dat[2], for %(size) here,
+     * but it's not available.  it might also be nice to know
+     * if the message originally had any mime parts or not -- but
+     * there's also no record of that.  (except for MIME-version:)
+     */
+
+    fmt_scan(fmt, outbuf, BUFSIZ, dat, NULL);
+
+    fputs(charstring_buffer (outbuf), stdout);
+    charstring_free (outbuf);
+
+    fmt_freecomptext();
+}
+
+static void
+output_marker(CT ct, struct format *fmt, int hidden)

 {
 {

-    char outbuf[BUFSIZ];
+    charstring_t outbuf = charstring_create (BUFSIZ);

     struct param_comp_list *pcentry;
     struct param_comp_list *pcentry;

-    int dat[5];
+    int partsize;
+    int message = 0;
+    char *endp;
+    int dat[5] = { 0 };

 
     /*
      * Grab any items we care about.
 
     /*
      * Grab any items we care about.


@@ -1282,15 +1432,15 @@ output_marker(CT ct, struct format *fmt)
     }
 
     if (part_comp && ct->c_partno) {
     }
 
     if (part_comp && ct->c_partno) {

-       part_comp->c_text = getcpy(ct->c_partno);
+       part_comp->c_text = mh_xstrdup(ct->c_partno);

     }
 
     if (description_comp && ct->c_descr) {
     }
 
     if (description_comp && ct->c_descr) {

-       description_comp->c_text = getcpy(ct->c_descr);
+       description_comp->c_text = mh_xstrdup(ct->c_descr);

     }
 
     if (dispo_comp && ct->c_dispo_type) {
     }
 
     if (dispo_comp && ct->c_dispo_type) {

-       dispo_comp->c_text = getcpy(ct->c_dispo_type);
+       dispo_comp->c_text = mh_xstrdup(ct->c_dispo_type);

     }
 
     for (pcentry = ctype_pc_list; pcentry != NULL; pcentry = pcentry->next) {
     }
 
     for (pcentry = ctype_pc_list; pcentry != NULL; pcentry = pcentry->next) {


@@ -1303,9 +1453,28 @@ output_marker(CT ct, struct format *fmt)
                                          pcentry->param, '?', 0);
     }
 
                                          pcentry->param, '?', 0);
     }
 

-    fmt_scan(fmt, outbuf, sizeof(outbuf), sizeof(outbuf), dat, NULL);
+    if (ct->c_cesizefnx)
+       partsize = (*ct->c_cesizefnx) (ct);
+    else
+       partsize = ct->c_end - ct->c_begin;
+
+    if (ct->c_file && *ct->c_file) {
+       message = strtol(ct->c_file, &endp, 10);
+       if (*endp) message = 0;
+       dat[0] = message;
+    }
+    dat[2] = partsize;
+
+    /* make the part's hidden aspect available by overloading the
+     * %(unseen) function.  make the part's size available via %(size).
+     * see comments in h/fmt_scan.h.
+     */
+    dat[4] = hidden;
+
+    fmt_scan(fmt, outbuf, BUFSIZ, dat, NULL);

 
 

-    fputs(outbuf, stdout);
+    fputs(charstring_buffer (outbuf), stdout);
+    charstring_free (outbuf);

 
     fmt_freecomptext();
 }
 
     fmt_freecomptext();
 }


@@ -1319,6 +1488,7 @@ free_markercomps(void)
 {
     struct param_comp_list *pc_entry, *pc2;
 
 {
     struct param_comp_list *pc_entry, *pc2;
 

+    folder_comp = NULL;

     part_comp = NULL;
     ctype_comp = NULL;
     description_comp = NULL;
     part_comp = NULL;
     ctype_comp = NULL;
     description_comp = NULL;