lib-mime/rfc3676.c

   1 /*
   2  * Parts were written/modified by:
   3  * Andreas Krennmair <ak@synflood.at>
   4  * Peter J. Holzer <hjp@hjp.net>
   5  * Rocco Rutte <pdmef@cs.tu-berlin.de>
   6  *
   7  * This file is part of mutt-ng, see http://www.muttng.org/.
   8  * It's licensed under the GNU General Public License,
   9  * please see the file GPL in the top level source directory.
  10  */
  11
  12 #include <lib-lib/lib-lib.h>
  13
  14 #include <lib-ui/curses.h>
  15
  16 #include "state.h"
  17 #include "rfc3676.h"
  18
  19 #define FLOWED_MAX 77
  20
  21 static int get_quote_level (char *line)
  22 {
  23   int quoted;
  24
  25   for (quoted = 0; line[quoted] == '>'; quoted++);
  26   return quoted;
  27 }
  28
  29 static void print_flowed_line (char *line, STATE * s, int ql) {
  30   int width;
  31   char *pos, *oldpos;
  32   int len = m_strlen(line);
  33   int i;
  34
  35   if (MaxLineLength > 0) {
  36     width = MaxLineLength - WrapMargin - ql - 1;
  37     if (!(s->flags & M_REPLYING) && option (OPTSTUFFQUOTED))
  38       --width;
  39     if (width < 0)
  40       width = MaxLineLength;
  41   }
  42   else {
  43     if (option (OPTMBOXPANE))
  44       width = COLS - SidebarWidth - WrapMargin - ql - 1;
  45     else
  46       width = COLS - WrapMargin - ql - 1;
  47
  48     if (!(s->flags & M_REPLYING) && option (OPTSTUFFQUOTED))
  49       --width;
  50     if (width < 0)
  51       width = COLS;
  52   }
  53
  54   if (m_strlen(line) == 0) {
  55     if (!(s->flags & M_REPLYING) || option (OPTQUOTEEMPTY)) {
  56       if (s->prefix)
  57         state_puts(s->prefix,s);
  58       for (i=0;i<ql;++i) state_putc('>',s);
  59       if (!(s->flags & M_REPLYING) && option(OPTSTUFFQUOTED))
  60         state_putc(' ',s);
  61     }
  62     state_putc('\n',s);
  63     return;
  64   }
  65
  66   pos = line + width;
  67   oldpos = line;
  68
  69   for (; oldpos < line + len; pos += width) {
  70     /* only search a new position when we're not over
  71      * the end of the string w/ pos */
  72     if (pos < line + len) {
  73       if (*pos == ' ') {
  74         *pos = '\0';
  75         ++pos;
  76       }
  77       else {
  78         char *save = pos;
  79
  80         while (pos >= oldpos && *pos != ' ') {
  81           --pos;
  82         }
  83         if (pos < oldpos) {
  84           pos = save;
  85           while (pos < line + len && *pos && *pos != ' ') {
  86             ++pos;
  87           }
  88         }
  89         *pos = '\0';
  90         ++pos;
  91       }
  92     }
  93
  94     if (s->prefix)
  95       state_puts (s->prefix, s);
  96
  97     for (i = 0; i < ql; ++i)
  98       state_putc ('>', s);
  99     if (!(s->flags & M_REPLYING) && option (OPTSTUFFQUOTED) &&
 100         (ql > 0 || s->prefix))
 101       state_putc (' ', s);
 102     state_puts (oldpos, s);
 103     /* fprintf(stderr,"print_flowed_line: `%s'\n",oldpos); */
 104     if (pos < line + len)
 105       state_putc (' ', s);
 106     state_putc ('\n', s);
 107     oldpos = pos;
 108   }
 109 }
 110
 111 int rfc3676_handler (BODY * a, STATE * s) {
 112   int bytes = a->length;
 113   char buf[LONG_STRING];
 114   char *curline = p_new(char, 1);
 115   char *t = NULL;
 116   unsigned int curline_len = 1,
 117                quotelevel = 0, newql = 0;
 118   int buf_off, buf_len;
 119   int delsp = 0, fixed = 0;
 120
 121   *curline='\0';
 122
 123   /* respect DelSP of RfC3676 only with f=f parts */
 124   if ((t = parameter_getval(a->parameter, "delsp"))) {
 125     delsp = m_strlen(t) == 3 && ascii_strncasecmp (t, "yes", 3) == 0;
 126     t = NULL;
 127   }
 128
 129
 130   while (bytes > 0 && fgets (buf, sizeof (buf), s->fpin)) {
 131
 132     buf_len = m_strlen(buf);
 133     bytes -= buf_len;
 134
 135     newql = get_quote_level (buf);
 136
 137     /* a change of quoting level in a paragraph - shouldn't happen,
 138      * but has to be handled - see RFC 3676, sec. 4.5.
 139      */
 140     if (newql != quotelevel && curline && *curline) {
 141       print_flowed_line (curline, s, quotelevel);
 142       *curline = '\0';
 143       curline_len = 1;
 144     }
 145     quotelevel = newql;
 146
 147     /* XXX - If a line is longer than buf (shouldn't happen), it is split.
 148      * This will almost always cause an unintended line break, and
 149      * possibly a change in quoting level. But that's better than not
 150      * displaying it at all.
 151      */
 152     if ((t = strrchr (buf, '\r')) || (t = strrchr (buf, '\n'))) {
 153       *t = '\0';
 154       buf_len = t - buf;
 155     }
 156
 157     buf_off = newql;
 158     /* respect space-stuffing */
 159     if (buf[buf_off] == ' ')
 160       buf_off++;
 161
 162     /* for DelSp=yes, we need to strip one SP prior to CRLF
 163      * which may make the line look like fixed although it wasn't
 164      * so keep this in mind for later processing */
 165     fixed = buf_len == 0 || buf[buf_len - 1] != ' ' ||
 166             (strcmp(buf + buf_off, "-- ") == 0);
 167
 168     if (delsp && buf_len >= 1 && buf[buf_len-1] == ' ')
 169       buf[--buf_len] = '\0';
 170
 171     /* we're here when last space removed 'cause of DelSp was
 172      * the last space and there isn't more -> done */
 173     if ((buf_len - buf_off) < 0) {
 174       print_flowed_line (curline, s, quotelevel);
 175       *curline = '\0';
 176       curline_len = 1;
 177       continue;
 178     }
 179
 180     /* signature separator also flushes the previous paragraph */
 181     if (strcmp(buf + buf_off, "-- ") == 0 && curline && *curline) {
 182       print_flowed_line (curline, s, quotelevel);
 183       *curline = '\0';
 184       curline_len = 1;
 185     }
 186
 187     p_realloc(&curline, curline_len + buf_len - buf_off);
 188     strcpy (curline + curline_len - 1, buf + buf_off);
 189     curline_len += buf_len - buf_off;
 190
 191     /* if this was a fixed line the paragraph is finished */
 192     if (fixed) {
 193       print_flowed_line (curline, s, quotelevel);
 194       *curline = '\0';
 195       curline_len = 1;
 196     }
 197
 198   }
 199   p_delete(&curline);
 200   return (0);
 201 }
 202
 203 void rfc3676_space_stuff (HEADER* hdr) {
 204   FILE* in = NULL, *out = NULL;
 205   char buf[LONG_STRING];
 206   char tmpf[_POSIX_PATH_MAX];
 207
 208   if (!hdr || !hdr->content || !hdr->content->filename)
 209     return;
 210
 211   if ((in = safe_fopen (hdr->content->filename, "r")) == NULL)
 212     return;
 213   mutt_mktemp (tmpf);
 214   if ((out = safe_fopen (tmpf, "w+")) == NULL) {
 215     fclose (in);
 216     return;
 217   }
 218
 219   while (fgets (buf, sizeof (buf), in)) {
 220     if (m_strncmp("From ", buf, 4) == 0 || buf[0] == ' ') {
 221       fputc (' ', out);
 222     }
 223     fputs (buf, out);
 224   }
 225   fclose (in);
 226   fclose (out);
 227   mutt_set_mtime (hdr->content->filename, tmpf);
 228   unlink (hdr->content->filename);
 229   m_strreplace(&hdr->content->filename, tmpf);
 230 }