stupid off by one: skip the last ')' in a comment !
[apps/madmutt.git] / lib-mime / mime.c
index 212c24d..43ccfd3 100644 (file)
  *
  *  Copyright © 2006 Pierre Habouzit
  */
+/*
+ * Copyright notice from original mutt:
+ * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
+ * Copyright (C) 1999-2000 Thomas Roessler <roessler@does-not-exist.org>
+ */
 
-#include <lib-lib/ascii.h>
-#include <lib-lib/url.h>
+#include <lib-lib/lib-lib.h>
 
 #include "mime.h"
 
-#include "mutt.h"
-
 #define BOUNDARYLEN 16
 
 const char MimeSpecials[] = "@.,;:<>[]\\\"()?/= \t";
@@ -134,18 +136,6 @@ void parameter_set_boundary(parameter_t **parm)
 /* XXX                                                                      */
 /****************************************************************************/
 
-void rfc1524_entry_wipe(rfc1524_entry *p)
-{
-    p_delete(&p->command);
-    p_delete(&p->testcommand);
-    p_delete(&p->composecommand);
-    p_delete(&p->composetypecommand);
-    p_delete(&p->editcommand);
-    p_delete(&p->printcommand);
-    p_delete(&p->nametemplate);
-    p_delete(&p->convert);
-}
-
 void envelope_wipe(ENVELOPE *p)
 {
     address_list_wipe(&p->return_path);
@@ -211,12 +201,50 @@ void header_wipe(HEADER *h)
     p_delete(&h->maildir_flags);
     p_delete(&h->tree);
     p_delete(&h->path);
-#ifdef MIXMASTER
     string_list_wipe(&h->chain);
-#endif
     p_delete(&h->data);
 }
 
+
+/****************************************************************************/
+/* misc functions                                                           */
+/****************************************************************************/
+
+int mutt_is_message_type(BODY *b)
+{
+    int tok;
+
+    if (b->type != TYPEMESSAGE)
+        return 0;
+
+    tok = mime_which_token(b->subtype, -1);
+    return tok == MIME_RFC822 || tok == MIME_NEWS;
+}
+
+int mutt_is_text_part(BODY * b)
+{
+    char *s = b->subtype;
+
+    if (mutt_is_application_pgp(b))
+        return 0;
+
+    switch (b->type) {
+      case TYPETEXT:
+        return 1;
+
+      case TYPEMESSAGE:
+        return mime_which_token(s, -1) == MIME_DELIVERY_STATUS;
+
+      case TYPEAPPLICATION:
+        return mime_which_token(s, -1) == MIME_PGP_KEYS;
+
+      default:
+        return 0;
+    }
+}
+
+#include "mutt.h"
+
 int url_parse_mailto(ENVELOPE *e, char **body, const char *src)
 {
     char *t;
@@ -239,11 +267,11 @@ int url_parse_mailto(ENVELOPE *e, char **body, const char *src)
         *headers++ = '\0';
 
     url_decode(tmp);
-    e->to = rfc822_parse_adrlist (e->to, tmp);
+    e->to = rfc822_parse_adrlist(e->to, tmp);
 
     tag = headers ? strtok (headers, "&") : NULL;
 
-    for (; tag; tag = strtok (NULL, "&")) {
+    for (; tag; tag = strtok(NULL, "&")) {
         if ((value = strchr (tag, '=')))
             *value++ = '\0';
         if (!value || !*value)
@@ -252,19 +280,18 @@ int url_parse_mailto(ENVELOPE *e, char **body, const char *src)
         url_decode (tag);
         url_decode (value);
 
-        if (!ascii_strcasecmp (tag, "body")) {
+        if (mime_which_token(tag, -1) == MIME_BODY) {
             if (body)
                 m_strreplace(body, value);
-        }
-        else {
-#define SAFEPFX (option (OPTSTRICTMAILTO) ? "" : "X-Mailto-")
-            taglen = m_strlen(tag) + m_strlen(SAFEPFX);
+        } else {
+#define SAFEPFX (option(OPTSTRICTMAILTO) ? "" : "X-Mailto-")
+            taglen = m_strlen(tag) + strlen(SAFEPFX);
             /* mutt_parse_rfc822_line makes some assumptions */
-            snprintf (scratch, sizeof (scratch), "%s%s: %s", SAFEPFX, tag, value);
+            snprintf(scratch, sizeof(scratch), "%s%s: %s", SAFEPFX, tag, value);
 #undef SAVEPFX
             scratch[taglen] = '\0';
             value = vskipspaces(&scratch[taglen + 1]);
-            last = mutt_parse_rfc822_line (e, NULL, scratch, value, 0, 0, last);
+            last  = mutt_parse_rfc822_line (e, NULL, scratch, value, 0, 0, last);
             /* if $strict_mailto is set, force editing headers to let
              * users have a look at what we got */
             if (!option (OPTSTRICTMAILTO)) {