2 * Copyright notice from original mutt:
3 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
5 * This file is part of mutt-ng, see http://www.muttng.org/.
6 * It's licensed under the GNU General Public License,
7 * please see the file GPL in the top level source directory.
21 #include <lib-lib/mem.h>
22 #include <lib-lib/ascii.h>
23 #include <lib-lib/str.h>
24 #include <lib-lib/macros.h>
25 #include <lib-lib/file.h>
26 #include <lib-lib/debug.h>
28 #include <lib-mime/mime.h>
30 #include <lib-ui/curses.h>
33 #include "recvattach.h"
40 #include <lib-crypt/crypt.h>
46 typedef int handler_f (BODY *, STATE *);
47 typedef handler_f *handler_t;
49 static void mutt_decode_xbit (STATE * s, long len, int istext, iconv_t cd)
58 while ((c = fgetc (s->fpin)) != EOF && len--) {
59 if (c == '\r' && len) {
60 if ((ch = fgetc (s->fpin)) == '\n') {
69 if (l == sizeof (bufi))
70 mutt_convert_to_state (cd, bufi, &l, s);
73 mutt_convert_to_state (cd, bufi, &l, s);
74 mutt_convert_to_state (cd, 0, 0, s);
76 state_reset_prefix (s);
79 mutt_copy_bytes (s->fpin, s->fpout, len);
82 static int qp_decode_triple (char *s, char *d)
85 if (*s == '=' && !(*(s + 1)))
88 /* quoted-printable triple */
90 isxdigit ((unsigned char) *(s + 1)) &&
91 isxdigit ((unsigned char) *(s + 2))) {
92 *d = (hexval (*(s + 1)) << 4) | hexval (*(s + 2));
100 static void qp_decode_line (char *dest, char *src, size_t * l, int last)
108 /* decode the line */
110 for (d = dest, s = src; *s;) {
111 switch ((kind = qp_decode_triple (s, &c))) {
115 break; /* qp triple */
118 break; /* single character */
122 break; /* soft line break */
126 if (!soft && last == '\n')
134 * Decode an attachment encoded with quoted-printable.
136 * Why doesn't this overflow any buffers? First, it's guaranteed
137 * that the length of a line grows when you _en_-code it to
138 * quoted-printable. That means that we always can store the
139 * result in a buffer of at most the _same_ size.
141 * Now, we don't special-case if the line we read with fgets()
142 * isn't terminated. We don't care about this, since STRING > 78,
143 * so corrupted input will just be corrupted a bit more. That
144 * implies that STRING+1 bytes are always sufficient to store the
145 * result of qp_decode_line.
147 * Finally, at soft line breaks, some part of a multibyte character
148 * may have been left over by mutt_convert_to_state(). This shouldn't
149 * be more than 6 characters, so STRING + 7 should be sufficient
150 * memory to store the decoded data.
152 * Just to make sure that I didn't make some off-by-one error
153 * above, we just use STRING*2 for the target buffer's size.
157 void mutt_decode_quoted (STATE * s, long len, int istext, iconv_t cd)
160 char decline[2 * STRING];
162 size_t linelen; /* number of input bytes in `line' */
165 int last; /* store the last character in the input line */
168 state_set_prefix (s);
174 * It's ok to use a fixed size buffer for input, even if the line turns
175 * out to be longer than this. Just process the line in chunks. This
176 * really shouldn't happen according the MIME spec, since Q-P encoded
177 * lines are at most 76 characters, but we should be liberal about what
180 if (fgets (line, MIN ((ssize_t) sizeof (line), len + 1), s->fpin) == NULL)
183 linelen = m_strlen(line);
187 * inspect the last character we read so we can tell if we got the
190 last = linelen ? line[linelen - 1] : 0;
192 /* chop trailing whitespace if we got the full line */
194 while (linelen > 0 && ISSPACE (line[linelen - 1]))
199 /* decode and do character set conversion */
200 qp_decode_line (decline + l, line, &l3, last);
202 mutt_convert_to_state (cd, decline, &l, s);
205 mutt_convert_to_state (cd, 0, 0, s);
206 state_reset_prefix (s);
209 void mutt_decode_base64 (STATE * s, long len, int istext, iconv_t cd)
212 int c1, c2, c3, c4, ch, cr = 0, i;
213 char bufi[BUFI_SIZE];
219 state_set_prefix (s);
222 for (i = 0; i < 4 && len > 0; len--) {
223 if ((ch = fgetc (s->fpin)) == EOF)
225 if (base64val(ch) >= 0 || ch == '=')
229 debug_print (2, ("didn't get a multiple of 4 chars.\n"));
233 c1 = base64val(buf[0]);
234 c2 = base64val(buf[1]);
235 ch = (c1 << 2) | (c2 >> 4);
237 if (cr && ch != '\n')
242 if (istext && ch == '\r')
249 c3 = base64val(buf[2]);
250 ch = ((c2 & 0xf) << 4) | (c3 >> 2);
252 if (cr && ch != '\n')
257 if (istext && ch == '\r')
264 c4 = base64val(buf[3]);
265 ch = ((c3 & 0x3) << 6) | c4;
267 if (cr && ch != '\n')
271 if (istext && ch == '\r')
276 if (l + 8 >= sizeof (bufi))
277 mutt_convert_to_state (cd, bufi, &l, s);
283 mutt_convert_to_state (cd, bufi, &l, s);
284 mutt_convert_to_state (cd, 0, 0, s);
286 state_reset_prefix (s);
289 unsigned char decode_byte (char ch)
296 void mutt_decode_uuencoded (STATE * s, long len, int istext, iconv_t cd)
298 char tmps[SHORT_STRING];
299 char linelen, c, l, out;
301 char bufi[BUFI_SIZE];
305 state_set_prefix (s);
308 if ((fgets (tmps, sizeof (tmps), s->fpin)) == NULL)
310 len -= m_strlen(tmps);
311 if ((!m_strncmp(tmps, "begin", 5)) && ISSPACE (tmps[5]))
315 if ((fgets (tmps, sizeof (tmps), s->fpin)) == NULL)
317 len -= m_strlen(tmps);
318 if (!m_strncmp(tmps, "end", 3))
321 linelen = decode_byte (*pt);
323 for (c = 0; c < linelen;) {
324 for (l = 2; l <= 6; l += 2) {
325 out = decode_byte (*pt) << l;
327 out |= (decode_byte (*pt) >> (6 - l));
333 mutt_convert_to_state (cd, bufi, &k, s);
338 mutt_convert_to_state (cd, bufi, &k, s);
339 mutt_convert_to_state (cd, 0, 0, s);
341 state_reset_prefix (s);
344 /* ----------------------------------------------------------------------------
345 * A (not so) minimal implementation of RFC1563.
348 #define IndentSize (4)
350 enum { RICH_PARAM = 0, RICH_BOLD, RICH_UNDERLINE, RICH_ITALIC, RICH_NOFILL,
351 RICH_INDENT, RICH_INDENT_RIGHT, RICH_EXCERPT, RICH_CENTER, RICH_FLUSHLEFT,
352 RICH_FLUSHRIGHT, RICH_COLOR, RICH_LAST_TAG
356 const char *tag_name;
360 "param", RICH_PARAM}, {
361 "bold", RICH_BOLD}, {
362 "italic", RICH_ITALIC}, {
363 "underline", RICH_UNDERLINE}, {
364 "nofill", RICH_NOFILL}, {
365 "excerpt", RICH_EXCERPT}, {
366 "indent", RICH_INDENT}, {
367 "indentright", RICH_INDENT_RIGHT}, {
368 "center", RICH_CENTER}, {
369 "flushleft", RICH_FLUSHLEFT}, {
370 "flushright", RICH_FLUSHRIGHT}, {
371 "flushboth", RICH_FLUSHLEFT}, {
372 "color", RICH_COLOR}, {
373 "x-color", RICH_COLOR}, {
377 struct enriched_state {
390 int tag_level[RICH_LAST_TAG];
395 static void enriched_wrap (struct enriched_state *stte)
400 if (stte->line_len) {
401 if (stte->tag_level[RICH_CENTER] || stte->tag_level[RICH_FLUSHRIGHT]) {
402 /* Strip trailing white space */
403 size_t y = stte->line_used - 1;
405 while (y && ISSPACE (stte->line[y])) {
406 stte->line[y] = '\0';
411 if (stte->tag_level[RICH_CENTER]) {
412 /* Strip leading whitespace */
415 while (stte->line[y] && ISSPACE (stte->line[y]))
420 for (z = y; z <= stte->line_used; z++) {
421 stte->line[z - y] = stte->line[z];
425 stte->line_used -= y;
430 extra = stte->WrapMargin - stte->line_len - stte->indent_len -
431 (stte->tag_level[RICH_INDENT_RIGHT] * IndentSize);
433 if (stte->tag_level[RICH_CENTER]) {
436 state_putc (' ', stte->s);
440 else if (stte->tag_level[RICH_FLUSHRIGHT]) {
443 state_putc (' ', stte->s);
448 state_puts (stte->line, stte->s);
451 state_putc ('\n', stte->s);
452 stte->line[0] = '\0';
455 stte->indent_len = 0;
456 if (stte->s->prefix) {
457 state_puts (stte->s->prefix, stte->s);
458 stte->indent_len += m_strlen(stte->s->prefix);
461 if (stte->tag_level[RICH_EXCERPT]) {
462 x = stte->tag_level[RICH_EXCERPT];
464 if (stte->s->prefix) {
465 state_puts (stte->s->prefix, stte->s);
466 stte->indent_len += m_strlen(stte->s->prefix);
469 state_puts ("> ", stte->s);
470 stte->indent_len += m_strlen("> ");
476 stte->indent_len = 0;
477 if (stte->tag_level[RICH_INDENT]) {
478 x = stte->tag_level[RICH_INDENT] * IndentSize;
479 stte->indent_len += x;
481 state_putc (' ', stte->s);
487 static void enriched_flush (struct enriched_state *stte, int wrap)
489 if (!stte->tag_level[RICH_NOFILL] && (stte->line_len + stte->word_len >
491 (stte->tag_level[RICH_INDENT_RIGHT] *
492 IndentSize) - stte->indent_len)))
493 enriched_wrap (stte);
495 if (stte->buff_used) {
496 stte->buffer[stte->buff_used] = '\0';
497 stte->line_used += stte->buff_used;
498 if (stte->line_used > stte->line_max) {
499 stte->line_max = stte->line_used;
500 p_realloc(&stte->line, stte->line_max + 1);
502 strcat (stte->line, stte->buffer); /* __STRCAT_CHECKED__ */
503 stte->line_len += stte->word_len;
508 enriched_wrap (stte);
512 static void enriched_putc (int c, struct enriched_state *stte)
514 if (stte->tag_level[RICH_PARAM]) {
515 if (stte->tag_level[RICH_COLOR]) {
516 if (stte->param_used + 1 >= stte->param_len)
517 p_realloc(&stte->param, (stte->param_len += STRING));
519 stte->param[stte->param_used++] = c;
521 return; /* nothing to do */
524 /* see if more space is needed (plus extra for possible rich characters) */
525 if (stte->buff_len < stte->buff_used + 3) {
526 stte->buff_len += LONG_STRING;
527 p_realloc(&stte->buffer, stte->buff_len + 1);
530 if ((!stte->tag_level[RICH_NOFILL] && ISSPACE (c)) || c == '\0') {
532 stte->word_len += 8 - (stte->line_len + stte->word_len) % 8;
536 stte->buffer[stte->buff_used++] = c;
537 enriched_flush (stte, 0);
540 if (stte->s->flags & M_DISPLAY) {
541 if (stte->tag_level[RICH_BOLD]) {
542 stte->buffer[stte->buff_used++] = c;
543 stte->buffer[stte->buff_used++] = '\010';
544 stte->buffer[stte->buff_used++] = c;
546 else if (stte->tag_level[RICH_UNDERLINE]) {
548 stte->buffer[stte->buff_used++] = '_';
549 stte->buffer[stte->buff_used++] = '\010';
550 stte->buffer[stte->buff_used++] = c;
552 else if (stte->tag_level[RICH_ITALIC]) {
553 stte->buffer[stte->buff_used++] = c;
554 stte->buffer[stte->buff_used++] = '\010';
555 stte->buffer[stte->buff_used++] = '_';
558 stte->buffer[stte->buff_used++] = c;
562 stte->buffer[stte->buff_used++] = c;
568 static void enriched_puts (const char *s, struct enriched_state *stte)
572 if (stte->buff_len < stte->buff_used + m_strlen(s)) {
573 stte->buff_len += LONG_STRING;
574 p_realloc(&stte->buffer, stte->buff_len + 1);
579 stte->buffer[stte->buff_used++] = *p++;
583 static void enriched_set_flags (const char *tag, struct enriched_state *stte)
585 const char *tagptr = tag;
591 for (i = 0, j = -1; EnrichedTags[i].tag_name; i++)
592 if (ascii_strcasecmp (EnrichedTags[i].tag_name, tagptr) == 0) {
593 j = EnrichedTags[i].index;
598 if (j == RICH_CENTER || j == RICH_FLUSHLEFT || j == RICH_FLUSHRIGHT)
599 enriched_flush (stte, 1);
602 if (stte->tag_level[j]) /* make sure not to go negative */
603 stte->tag_level[j]--;
604 if ((stte->s->flags & M_DISPLAY) && j == RICH_PARAM
605 && stte->tag_level[RICH_COLOR]) {
606 stte->param[stte->param_used] = '\0';
607 if (!ascii_strcasecmp (stte->param, "black")) {
608 enriched_puts ("\033[30m", stte);
610 else if (!ascii_strcasecmp (stte->param, "red")) {
611 enriched_puts ("\033[31m", stte);
613 else if (!ascii_strcasecmp (stte->param, "green")) {
614 enriched_puts ("\033[32m", stte);
616 else if (!ascii_strcasecmp (stte->param, "yellow")) {
617 enriched_puts ("\033[33m", stte);
619 else if (!ascii_strcasecmp (stte->param, "blue")) {
620 enriched_puts ("\033[34m", stte);
622 else if (!ascii_strcasecmp (stte->param, "magenta")) {
623 enriched_puts ("\033[35m", stte);
625 else if (!ascii_strcasecmp (stte->param, "cyan")) {
626 enriched_puts ("\033[36m", stte);
628 else if (!ascii_strcasecmp (stte->param, "white")) {
629 enriched_puts ("\033[37m", stte);
632 if ((stte->s->flags & M_DISPLAY) && j == RICH_COLOR) {
633 enriched_puts ("\033[0m", stte);
636 /* flush parameter buffer when closing the tag */
637 if (j == RICH_PARAM) {
638 stte->param_used = 0;
639 stte->param[0] = '\0';
643 stte->tag_level[j]++;
645 if (j == RICH_EXCERPT)
646 enriched_flush (stte, 1);
650 int text_enriched_handler (BODY * a, STATE * s)
653 TEXT, LANGLE, TAG, BOGUS_TAG, NEWLINE, ST_EOF, DONE
656 long bytes = a->length;
657 struct enriched_state stte;
660 char tag[LONG_STRING + 1];
665 ((s->flags & M_DISPLAY) ? (COLS - 4) : ((COLS - 4) <
666 72) ? (COLS - 4) : 72);
667 stte.line_max = stte.WrapMargin * 4;
668 stte.line = p_new(char, stte.line_max + 1);
669 stte.param = p_new(char, STRING);
671 stte.param_len = STRING;
675 state_puts (s->prefix, s);
676 stte.indent_len += m_strlen(s->prefix);
679 while (state != DONE) {
680 if (state != ST_EOF) {
681 if (!bytes || (c = fgetc (s->fpin)) == EOF)
695 if (stte.tag_level[RICH_NOFILL]) {
696 enriched_flush (&stte, 1);
699 enriched_putc (' ', &stte);
705 enriched_putc (c, &stte);
711 enriched_putc (c, &stte);
719 /* Yes, fall through (it wasn't a <<, so this char is first in TAG) */
723 enriched_set_flags (tag, &stte);
726 else if (tag_len < LONG_STRING) /* ignore overly long tags */
739 enriched_flush (&stte, 1);
748 enriched_putc ('\0', &stte);
749 enriched_flush (&stte, 1);
753 case DONE: /* not reached, but gcc complains if this is absent */
758 state_putc ('\n', s); /* add a final newline */
760 p_delete(&(stte.buffer));
761 p_delete(&(stte.line));
762 p_delete(&(stte.param));
769 #define TXTENRICHED 3
771 static int alternative_handler (BODY * a, STATE * s)
781 if (a->encoding == ENCBASE64 || a->encoding == ENCQUOTEDPRINTABLE ||
782 a->encoding == ENCUUENCODED) {
786 fstat (fileno (s->fpin), &st);
787 b = mutt_new_body ();
788 b->length = (long) st.st_size;
789 b->parts = mutt_parse_multipart (s->fpin,
790 mutt_get_parameter ("boundary",
793 ascii_strcasecmp ("digest",
801 /* First, search list of prefered types */
802 t = AlternativeOrderList;
803 while (t && !choice) {
805 int btlen; /* length of basetype */
806 int wild; /* do we have a wildcard to match all subtypes? */
808 c = strchr (t->data, '/');
810 wild = (c[1] == '*' && c[2] == 0);
815 btlen = m_strlen(t->data);
823 const char *bt = TYPE (b);
825 if (!ascii_strncasecmp (bt, t->data, btlen) && bt[btlen] == 0) {
826 /* the basetype matches */
827 if (wild || !ascii_strcasecmp (t->data + btlen + 1, b->subtype)) {
836 /* Next, look for an autoviewable type */
843 snprintf (buf, sizeof (buf), "%s/%s", TYPE (b), b->subtype);
844 if (mutt_is_autoview (b, buf)) {
845 rfc1524_entry *entry = rfc1524_new_entry ();
847 if (rfc1524_mailcap_lookup (b, buf, entry, M_AUTOVIEW)) {
850 rfc1524_free_entry (&entry);
856 /* Then, look for a text entry */
863 if (b->type == TYPETEXT) {
864 if (!ascii_strcasecmp ("plain", b->subtype) && type <= TXTPLAIN) {
868 else if (!ascii_strcasecmp ("enriched", b->subtype)
869 && type <= TXTENRICHED) {
873 else if (!ascii_strcasecmp ("html", b->subtype) && type <= TXTHTML) {
882 /* Finally, look for other possibilities */
889 if (mutt_can_decode (b))
896 if (s->flags & M_DISPLAY && !option (OPTWEED)) {
897 fseeko (s->fpin, choice->hdr_offset, 0);
898 mutt_copy_bytes (s->fpin, s->fpout,
899 choice->offset - choice->hdr_offset);
901 mutt_body_handler (choice, s);
903 else if (s->flags & M_DISPLAY) {
904 /* didn't find anything that we could display! */
905 state_mark_attach (s);
906 state_puts (_("[-- Error: Could not display any parts of Multipart/Alternative! --]\n"), s);
916 /* handles message/rfc822 body parts */
917 static int message_handler (BODY * a, STATE * s)
924 off_start = ftello (s->fpin);
925 if (a->encoding == ENCBASE64 || a->encoding == ENCQUOTEDPRINTABLE ||
926 a->encoding == ENCUUENCODED) {
927 fstat (fileno (s->fpin), &st);
928 b = mutt_new_body ();
929 b->length = (long) st.st_size;
930 b->parts = mutt_parse_messageRFC822 (s->fpin, b);
936 mutt_copy_hdr (s->fpin, s->fpout, off_start, b->parts->offset,
937 (((s->flags & M_WEED)
938 || ((s->flags & (M_DISPLAY | M_PRINTING))
939 && option (OPTWEED))) ? (CH_WEED | CH_REORDER) : 0) |
940 (s->prefix ? CH_PREFIX : 0) | CH_DECODE | CH_FROM,
944 state_puts (s->prefix, s);
945 state_putc ('\n', s);
947 rc = mutt_body_handler (b->parts, s);
950 if (a->encoding == ENCBASE64 || a->encoding == ENCQUOTEDPRINTABLE ||
951 a->encoding == ENCUUENCODED)
957 /* returns 1 if decoding the attachment will produce output */
958 int mutt_can_decode (BODY * a)
962 snprintf (type, sizeof (type), "%s/%s", TYPE (a), a->subtype);
963 if (mutt_is_autoview (a, type))
964 return (rfc1524_mailcap_lookup (a, type, NULL, M_AUTOVIEW));
965 else if (a->type == TYPETEXT)
967 else if (a->type == TYPEMESSAGE)
969 else if (a->type == TYPEMULTIPART) {
972 if (ascii_strcasecmp (a->subtype, "signed") == 0 ||
973 ascii_strcasecmp (a->subtype, "encrypted") == 0)
976 for (p = a->parts; p; p = p->next) {
977 if (mutt_can_decode (p))
982 else if (a->type == TYPEAPPLICATION) {
983 if (mutt_is_application_pgp(a))
985 if (mutt_is_application_smime (a))
992 static int multipart_handler (BODY * a, STATE * s)
1000 if (a->encoding == ENCBASE64 || a->encoding == ENCQUOTEDPRINTABLE ||
1001 a->encoding == ENCUUENCODED) {
1002 fstat (fileno (s->fpin), &st);
1003 b = mutt_new_body ();
1004 b->length = (long) st.st_size;
1005 b->parts = mutt_parse_multipart (s->fpin,
1006 mutt_get_parameter ("boundary",
1009 ascii_strcasecmp ("digest",
1015 for (p = b->parts, count = 1; p; p = p->next, count++) {
1016 if (s->flags & M_DISPLAY) {
1017 state_mark_attach (s);
1018 state_printf (s, _("[-- Attachment #%d"), count);
1019 if (p->description || p->filename || p->form_name) {
1020 state_puts (": ", s);
1021 state_puts (p->description ? p->description :
1022 p->filename ? p->filename : p->form_name, s);
1024 state_puts (" --]\n", s);
1026 mutt_pretty_size (length, sizeof (length), p->length);
1028 state_mark_attach (s);
1029 state_printf (s, _("[-- Type: %s/%s, Encoding: %s, Size: %s --]\n"),
1030 TYPE (p), p->subtype, ENCODING (p->encoding), length);
1031 if (!option (OPTWEED)) {
1032 fseeko (s->fpin, p->hdr_offset, 0);
1033 mutt_copy_bytes (s->fpin, s->fpout, p->offset - p->hdr_offset);
1036 state_putc ('\n', s);
1039 if (p->description && mutt_can_decode (p))
1040 state_printf (s, "Content-Description: %s\n", p->description);
1043 state_printf (s, "%s: \n", p->form_name);
1046 rc = mutt_body_handler (p, s);
1047 state_putc ('\n', s);
1048 if (rc || ((s->flags & M_REPLYING)
1049 && (option (OPTINCLUDEONLYFIRST)) && (s->flags & M_FIRSTDONE)))
1053 if (a->encoding == ENCBASE64 || a->encoding == ENCQUOTEDPRINTABLE ||
1054 a->encoding == ENCUUENCODED)
1055 mutt_free_body (&b);
1060 static int autoview_handler (BODY * a, STATE * s)
1062 rfc1524_entry *entry = rfc1524_new_entry ();
1063 char buffer[LONG_STRING];
1065 char command[LONG_STRING];
1066 char tempfile[_POSIX_PATH_MAX] = "";
1075 snprintf (type, sizeof (type), "%s/%s", TYPE (a), a->subtype);
1076 rfc1524_mailcap_lookup (a, type, entry, M_AUTOVIEW);
1078 fname = m_strdup(a->filename);
1079 mutt_sanitize_filename (fname, 1);
1080 rfc1524_expand_filename (entry->nametemplate, fname, tempfile,
1084 if (entry->command) {
1085 m_strcpy(command, sizeof(command), entry->command);
1087 /* rfc1524_expand_command returns 0 if the file is required */
1089 rfc1524_expand_command (a, tempfile, type, command, sizeof (command));
1091 if (s->flags & M_DISPLAY) {
1092 state_mark_attach (s);
1093 state_printf (s, _("[-- Autoview using %s --]\n"), command);
1094 mutt_message (_("Invoking autoview command: %s"), command);
1097 if ((fpin = safe_fopen (tempfile, "w+")) == NULL) {
1098 mutt_perror ("fopen");
1099 rfc1524_free_entry (&entry);
1103 mutt_copy_bytes (s->fpin, fpin, a->length);
1106 safe_fclose (&fpin);
1107 thepid = mutt_create_filter (command, NULL, &fpout, &fperr);
1113 thepid = mutt_create_filter_fd (command, NULL, &fpout, &fperr,
1114 fileno (fpin), -1, -1);
1118 mutt_perror (_("Can't create filter"));
1120 if (s->flags & M_DISPLAY) {
1121 state_mark_attach (s);
1122 state_printf (s, _("[-- Can't run %s. --]\n"), command);
1129 while (fgets (buffer, sizeof (buffer), fpout) != NULL) {
1130 state_puts (s->prefix, s);
1131 state_puts (buffer, s);
1133 /* check for data on stderr */
1134 if (fgets (buffer, sizeof (buffer), fperr)) {
1135 if (s->flags & M_DISPLAY) {
1136 state_mark_attach (s);
1137 state_printf (s, _("[-- Autoview stderr of %s --]\n"), command);
1140 state_puts (s->prefix, s);
1141 state_puts (buffer, s);
1142 while (fgets (buffer, sizeof (buffer), fperr) != NULL) {
1143 state_puts (s->prefix, s);
1144 state_puts (buffer, s);
1149 mutt_copy_stream (fpout, s->fpout);
1150 /* Check for stderr messages */
1151 if (fgets (buffer, sizeof (buffer), fperr)) {
1152 if (s->flags & M_DISPLAY) {
1153 state_mark_attach (s);
1154 state_printf (s, _("[-- Autoview stderr of %s --]\n"), command);
1157 state_puts (buffer, s);
1158 mutt_copy_stream (fperr, s->fpout);
1163 safe_fclose (&fpout);
1164 safe_fclose (&fperr);
1166 mutt_wait_filter (thepid);
1168 safe_fclose (&fpin);
1170 mutt_unlink (tempfile);
1172 if (s->flags & M_DISPLAY)
1173 mutt_clear_error ();
1175 rfc1524_free_entry (&entry);
1179 static int external_body_handler (BODY * b, STATE * s)
1181 const char *access_type;
1182 const char *expiration;
1185 access_type = mutt_get_parameter ("access-type", b->parameter);
1187 if (s->flags & M_DISPLAY) {
1188 state_mark_attach (s);
1189 state_puts (_("[-- Error: message/external-body has no access-type parameter --]\n"), s);
1194 expiration = mutt_get_parameter ("expiration", b->parameter);
1196 expire = mutt_parse_date (expiration, NULL);
1200 if (!ascii_strcasecmp (access_type, "x-mutt-deleted")) {
1201 if (s->flags & (M_DISPLAY | M_PRINTING)) {
1203 char pretty_size[10];
1205 state_mark_attach (s);
1206 state_printf (s, _("[-- This %s/%s attachment "),
1207 TYPE (b->parts), b->parts->subtype);
1208 length = mutt_get_parameter ("length", b->parameter);
1210 mutt_pretty_size (pretty_size, sizeof (pretty_size),
1211 strtol (length, NULL, 10));
1212 state_printf (s, _("(size %s bytes) "), pretty_size);
1214 state_puts (_("has been deleted --]\n"), s);
1217 state_mark_attach (s);
1218 state_printf (s, _("[-- on %s --]\n"), expiration);
1220 if (b->parts->filename) {
1221 state_mark_attach (s);
1222 state_printf (s, _("[-- name: %s --]\n"), b->parts->filename);
1225 mutt_copy_hdr (s->fpin, s->fpout, ftello (s->fpin), b->parts->offset,
1226 (option (OPTWEED) ? (CH_WEED | CH_REORDER) : 0) |
1230 else if (expiration && expire < time (NULL)) {
1231 if (s->flags & M_DISPLAY) {
1232 state_mark_attach (s);
1233 state_printf (s, _("[-- This %s/%s attachment is not included, --]\n"),
1234 TYPE (b->parts), b->parts->subtype);
1235 state_attach_puts (_("[-- and the indicated external source has --]\n"
1236 "[-- expired. --]\n"), s);
1238 mutt_copy_hdr (s->fpin, s->fpout, ftello (s->fpin), b->parts->offset,
1239 (option (OPTWEED) ? (CH_WEED | CH_REORDER) : 0) |
1244 if (s->flags & M_DISPLAY) {
1245 state_mark_attach (s);
1247 _("[-- This %s/%s attachment is not included, --]\n"),
1248 TYPE (b->parts), b->parts->subtype);
1249 state_mark_attach (s);
1252 ("[-- and the indicated access-type %s is unsupported --]\n"),
1254 mutt_copy_hdr (s->fpin, s->fpout, ftello (s->fpin), b->parts->offset,
1255 (option (OPTWEED) ? (CH_WEED | CH_REORDER) : 0) |
1262 void mutt_decode_attachment (BODY * b, STATE * s)
1264 int istext = mutt_is_text_part (b);
1265 iconv_t cd = (iconv_t) (-1);
1270 if (s->flags & M_CHARCONV) {
1271 const char *charset = mutt_get_parameter ("charset", b->parameter);
1273 if (!option (OPTSTRICTMIME) && !charset)
1274 charset = mutt_get_first_charset (AssumedCharset);
1275 if (charset && Charset)
1276 cd = mutt_iconv_open (Charset, charset, M_ICONV_HOOK_FROM);
1279 if (b->file_charset)
1280 cd = mutt_iconv_open (Charset, b->file_charset, M_ICONV_HOOK_FROM);
1284 fseeko (s->fpin, b->offset, 0);
1285 switch (b->encoding) {
1286 case ENCQUOTEDPRINTABLE:
1287 mutt_decode_quoted(s, b->length,
1288 istext || mutt_is_application_pgp(b), cd);
1291 mutt_decode_base64(s, b->length,
1292 istext || mutt_is_application_pgp(b), cd);
1295 mutt_decode_uuencoded(s, b->length,
1296 istext || mutt_is_application_pgp(b), cd);
1299 mutt_decode_xbit(s, b->length,
1300 istext || mutt_is_application_pgp(b), cd);
1304 if (cd != (iconv_t) (-1))
1308 int mutt_body_handler (BODY * b, STATE * s)
1313 char tempfile[_POSIX_PATH_MAX];
1314 handler_t handler = NULL;
1316 size_t tmplength = 0;
1320 int oflags = s->flags;
1322 /* first determine which handler to use to process this part */
1324 snprintf (type, sizeof (type), "%s/%s", TYPE (b), b->subtype);
1325 if (mutt_is_autoview (b, type)) {
1326 rfc1524_entry *entry = rfc1524_new_entry ();
1328 if (rfc1524_mailcap_lookup (b, type, entry, M_AUTOVIEW)) {
1329 handler = autoview_handler;
1330 s->flags &= ~M_CHARCONV;
1332 rfc1524_free_entry (&entry);
1334 else if (b->type == TYPETEXT) {
1335 if (ascii_strcasecmp ("plain", b->subtype) == 0) {
1336 /* avoid copying this part twice since removing the transfer-encoding is
1337 * the only operation needed.
1339 if (mutt_is_application_pgp (b))
1340 handler = crypt_pgp_application_pgp_handler;
1342 if (ascii_strcasecmp
1343 ("flowed", mutt_get_parameter ("format", b->parameter)) == 0)
1344 handler = rfc3676_handler;
1348 else if (ascii_strcasecmp ("enriched", b->subtype) == 0)
1349 handler = text_enriched_handler;
1350 else /* text body type without a handler */
1353 else if (b->type == TYPEMESSAGE) {
1354 if (mutt_is_message_type (b->type, b->subtype))
1355 handler = message_handler;
1356 else if (!ascii_strcasecmp ("delivery-status", b->subtype))
1358 else if (!ascii_strcasecmp ("external-body", b->subtype))
1359 handler = external_body_handler;
1361 else if (b->type == TYPEMULTIPART) {
1364 if (ascii_strcasecmp ("alternative", b->subtype) == 0)
1365 handler = alternative_handler;
1366 else if (ascii_strcasecmp ("signed", b->subtype) == 0) {
1367 p = mutt_get_parameter ("protocol", b->parameter);
1370 mutt_error (_("Error: multipart/signed has no protocol."));
1372 else if (s->flags & M_VERIFY)
1373 handler = mutt_signed_handler;
1375 else if (m_strcasecmp("encrypted", b->subtype) == 0) {
1376 p = mutt_get_parameter ("protocol", b->parameter);
1380 ("Error: multipart/encrypted has no protocol parameter!"));
1382 else if (ascii_strcasecmp ("application/pgp-encrypted", p) == 0)
1383 handler = crypt_pgp_encrypted_handler;
1387 handler = multipart_handler;
1389 else if (b->type == TYPEAPPLICATION) {
1390 if (mutt_is_application_pgp (b))
1391 handler = crypt_pgp_application_pgp_handler;
1392 if (mutt_is_application_smime (b))
1393 handler = crypt_smime_application_smime_handler;
1397 if (plaintext || handler) {
1398 fseeko (s->fpin, b->offset, 0);
1400 /* see if we need to decode this part before processing it */
1401 if (b->encoding == ENCBASE64 || b->encoding == ENCQUOTEDPRINTABLE || b->encoding == ENCUUENCODED || plaintext || mutt_is_text_part (b)) { /* text subtypes may
1403 * set conversion even
1404 * with 8bit encoding.
1406 int origType = b->type;
1407 char *savePrefix = NULL;
1410 /* decode to a tempfile, saving the original destination */
1412 mutt_mktemp (tempfile);
1413 if ((s->fpout = safe_fopen (tempfile, "w")) == NULL) {
1414 mutt_error _("Unable to open temporary file!");
1418 /* decoding the attachment changes the size and offset, so save a copy
1419 * of the "real" values now, and restore them after processing
1421 tmplength = b->length;
1422 tmpoffset = b->offset;
1424 /* if we are decoding binary bodies, we don't want to prefix each
1425 * line with the prefix or else the data will get corrupted.
1427 savePrefix = s->prefix;
1435 mutt_decode_attachment (b, s);
1438 b->length = ftello (s->fpout);
1442 /* restore final destination and substitute the tempfile for input */
1445 s->fpin = safe_fopen (tempfile, "r");
1448 /* restore the prefix */
1449 s->prefix = savePrefix;
1455 /* process the (decoded) body part */
1457 rc = handler (b, s);
1460 b->length = tmplength;
1461 b->offset = tmpoffset;
1463 /* restore the original source stream */
1468 s->flags |= M_FIRSTDONE;
1470 else if (s->flags & M_DISPLAY) {
1471 state_mark_attach (s);
1472 state_printf (s, _("[-- %s/%s is unsupported "), TYPE (b), b->subtype);
1473 if (!option (OPTVIEWATTACH)) {
1475 (type, sizeof (type),
1476 km_find_func (MENU_PAGER, OP_VIEW_ATTACHMENTS)))
1477 fprintf (s->fpout, _("(use '%s' to view this part)"), type);
1479 fputs (_("(need 'view-attachments' bound to key!)"), s->fpout);
1481 fputs (" --]\n", s->fpout);
1485 s->flags = oflags | (s->flags & M_FIRSTDONE);