simplify parse_parameters tokenizer
[apps/madmutt.git] / lib-mime / rfc822parse.c
index adc73d9..e9b171a 100644 (file)
@@ -163,151 +163,116 @@ LIST *mutt_parse_references(char *s, int in_reply_to)
     return lst;
 }
 
-int mutt_check_encoding (const char *c)
+int mutt_check_encoding(const char *s)
 {
-  if (ascii_strncasecmp ("7bit", c, sizeof ("7bit") - 1) == 0)
-    return (ENC7BIT);
-  else if (ascii_strncasecmp ("8bit", c, sizeof ("8bit") - 1) == 0)
-    return (ENC8BIT);
-  else if (ascii_strncasecmp ("binary", c, sizeof ("binary") - 1) == 0)
-    return (ENCBINARY);
-  else
-    if (ascii_strncasecmp
-        ("quoted-printable", c, sizeof ("quoted-printable") - 1) == 0)
-    return (ENCQUOTEDPRINTABLE);
-  else if (ascii_strncasecmp ("base64", c, sizeof ("base64") - 1) == 0)
-    return (ENCBASE64);
-  else if (ascii_strncasecmp ("x-uuencode", c, sizeof ("x-uuencode") - 1) == 0)
-    return (ENCUUENCODED);
-  else
-    return (ENCOTHER);
+#define COMPARE(tok, value)                             \
+    if (!ascii_strncasecmp(tok, s, sizeof(tok) - 1)) {  \
+        return value;                                   \
+    }
+    COMPARE("7bit", ENC7BIT);
+    COMPARE("8bit", ENC8BIT);
+    COMPARE("binary", ENCBINARY);
+    COMPARE("quoted-printable", ENCQUOTEDPRINTABLE);
+    COMPARE("base64", ENCBASE64);
+    COMPARE("x-uuencode", ENCUUENCODED);
+#undef COMPARE
+
+    return ENCOTHER;
 }
 
-static PARAMETER *parse_parameters (const char *s)
+int mutt_check_mime_type(const char *s)
 {
-  PARAMETER *head = 0, *cur = 0, *new;
-  char buffer[LONG_STRING];
-  const char *p;
-  size_t i;
-
-  debug_print (2, ("`%s'\n", s));
-
-  while (*s) {
-    if ((p = strpbrk (s, "=;")) == NULL) {
-      debug_print (1, ("malformed parameter: %s\n", s));
-      goto bail;
+#define COMPARE(tok, value)                             \
+    if (!ascii_strncasecmp(tok, s, sizeof(tok) - 1)) {  \
+        return value;                                   \
     }
+  COMPARE("text", TYPETEXT);
+  COMPARE("multipart", TYPEMULTIPART);
+  COMPARE("application", TYPEAPPLICATION);
+  COMPARE("message", TYPEMESSAGE);
+  COMPARE("image", TYPEIMAGE);
+  COMPARE("audio", TYPEAUDIO);
+  COMPARE("video", TYPEVIDEO);
+  COMPARE("model", TYPEMODEL);
+  COMPARE("*",  TYPEANY);
+  COMPARE(".*", TYPEANY);
+#undef COMPARE
+
+  return TYPEOTHER;
+}
 
-    /* if we hit a ; now the parameter has no value, just skip it */
-    if (*p != ';') {
-      i = p - s;
-
-      new = mutt_new_parameter ();
-
-      new->attribute = p_dupstr(s, i);
-
-      /* remove whitespace from the end of the attribute name */
-      while (ISSPACE (new->attribute[--i]))
-        new->attribute[i] = 0;
+static PARAMETER *parse_parameters(const char *s)
+{
+    PARAMETER *res = NULL;
+    PARAMETER **list = &res;
 
-      s = vskipspaces(p + 1);     /* skip over the = */
+    while (*s) {
+        const char *p;
+        PARAMETER *new;
+        int i;
 
-      if (*s == '"') {
-        int state_ascii = 1;
+        s = skipspaces(s);
+        if (*s == '=')             /* parameters are fucked up, go away */
+            break;
 
-        s++;
-        for (i = 0; *s && i < sizeof (buffer) - 1; i++, s++) {
-          if (!option (OPTSTRICTMIME)) {
-            /* As iso-2022-* has a characer of '"' with non-ascii state,
-             * ignore it. */
-            if (*s == 0x1b && i < sizeof (buffer) - 2) {
-              if (s[1] == '(' && (s[2] == 'B' || s[2] == 'J'))
-                state_ascii = 1;
-              else
-                state_ascii = 0;
-            }
-          }
-          if (state_ascii && *s == '"')
+        p = strpbrk(s, "=;");
+        if (!p)
             break;
-          if (*s == '\\') {
-            /* Quote the next character */
-            buffer[i] = s[1];
-            if (!*++s)
-              break;
-          }
-          else
-            buffer[i] = *s;
+
+        if (*p == ';') {
+            /* if we hit a ; now the parameter has no value, just skip it */
+            s = p + 1;
+            continue;
         }
-        buffer[i] = 0;
-        if (*s)
-          s++;                  /* skip over the " */
-      }
-      else {
-        for (i = 0; *s && *s != ' ' && *s != ';' && i < sizeof (buffer) - 1;
-             i++, s++)
-          buffer[i] = *s;
-        buffer[i] = 0;
-      }
 
-      new->value = m_strdup(buffer);
+        i = p - s;
+        new = parameter_new();
+        new->attribute = p_dupstr(s, i);
 
-      debug_print (2, ("`%s' = `%s'\n", new->attribute ? new->attribute : "",
-                  new->value ? new->value : ""));
+        while (--i >= 0 && ISSPACE(new->attribute[i])) {
+            new->attribute[i] = '\0';
+        }
+        s = skipspaces(p + 1);                      /* skip over the = */
+
+        if (*s == '"') {
+            char buffer[LONG_STRING];
+            int state_ascii = 1;
+
+            s++;
+            for (i = 0; *s && i < ssizeof(buffer) - 1; i++, s++) {
+                if (!option(OPTSTRICTMIME)) {
+                    /* As iso-2022-* has a characer of '"' with non-ascii state,
+                     * ignore it. */
+                    if (*s == 0x1b && i < ssizeof(buffer) - 2) {
+                        state_ascii = s[1] == '(' && (s[2] == 'B' || s[2] == 'J');
+                    }
+                }
+                if (state_ascii && *s == '"')
+                    break;
+
+                if (*s == '\\') {
+                    buffer[i] = *++s;
+                } else {
+                    buffer[i] = *s;
+                }
+            }
 
-      /* Add this parameter to the list */
-      if (head) {
-        cur->next = new;
-        cur = cur->next;
-      }
-      else
-        head = cur = new;
-    }
-    else {
-      debug_print (1, ("parameter with no value: %s\n", s));
-      s = p;
-    }
+            new->value = p_dupstr(buffer, i);
+        } else {
+            for (p = s; *p && *p != ' ' && *p != ';'; p++);
+            new->value = p_dupstr(s, p - s);
+        }
 
-    /* Find the next parameter */
-    if (*s != ';' && (s = strchr (s, ';')) == NULL)
-      break;                    /* no more parameters */
+        *list = new;
+        list = &new->next;
 
-    do {
-      /* Move past any leading whitespace */
-      s = vskipspaces(s + 1);
+        s = strchr(s, ';');           /* Find the next parameter */
+        if (!s)
+            break;                    /* no more parameters */
     }
-    while (*s == ';');          /* skip empty parameters */
-  }
-
-bail:
 
-  rfc2231_decode_parameters (&head);
-  return (head);
-}
-
-int mutt_check_mime_type (const char *s)
-{
-  if (ascii_strcasecmp ("text", s) == 0)
-    return TYPETEXT;
-  else if (ascii_strcasecmp ("multipart", s) == 0)
-    return TYPEMULTIPART;
-  else if (ascii_strcasecmp ("application", s) == 0)
-    return TYPEAPPLICATION;
-  else if (ascii_strcasecmp ("message", s) == 0)
-    return TYPEMESSAGE;
-  else if (ascii_strcasecmp ("image", s) == 0)
-    return TYPEIMAGE;
-  else if (ascii_strcasecmp ("audio", s) == 0)
-    return TYPEAUDIO;
-  else if (ascii_strcasecmp ("video", s) == 0)
-    return TYPEVIDEO;
-  else if (ascii_strcasecmp ("model", s) == 0)
-    return TYPEMODEL;
-  else if (ascii_strcasecmp ("*", s) == 0)
-    return TYPEANY;
-  else if (ascii_strcasecmp (".*", s) == 0)
-    return TYPEANY;
-  else
-    return TYPEOTHER;
+    rfc2231_decode_parameters(&res);
+    return res;
 }
 
 void mutt_parse_content_type (char *s, BODY * ct)
@@ -316,7 +281,7 @@ void mutt_parse_content_type (char *s, BODY * ct)
   char *subtype;
 
   p_delete(&ct->subtype);
-  mutt_free_parameter (&ct->parameter);
+  parameter_delete(&ct->parameter);
 
   /* First extract any existing parameters */
   if ((pc = strchr (s, ';')) != NULL) {
@@ -377,7 +342,6 @@ void mutt_parse_content_type (char *s, BODY * ct)
                           mutt_get_first_charset (AssumedCharset),
                           &ct->parameter);
   }
-
 }
 
 static void parse_content_disposition (char *s, BODY * ct)
@@ -399,7 +363,7 @@ static void parse_content_disposition (char *s, BODY * ct)
       m_strreplace(&ct->filename, s);
     if ((s = mutt_get_parameter ("name", parms)) != 0)
       ct->form_name = m_strdup(s);
-    mutt_free_parameter (&parms);
+    parameter_delete(&parms);
   }
 }
 
@@ -514,7 +478,7 @@ BODY *mutt_parse_messageRFC822 (FILE * fp, BODY * parent)
 {
   BODY *msg;
 
-  parent->hdr = mutt_new_header ();
+  parent->hdr = header_new();
   parent->hdr->offset = ftello (fp);
   parent->hdr->env = mutt_read_rfc822_header (fp, parent->hdr, 0, 0);
   msg = parent->hdr->content;
@@ -1249,12 +1213,12 @@ done:
  *             Used for recall-message.
  *
  * Returns:     newly allocated envelope structure.  You should free it by
- *              mutt_free_envelope() when envelope stay unneeded.
+ *              envelope_delete() when envelope stay unneeded.
  */
 ENVELOPE *mutt_read_rfc822_header (FILE * f, HEADER * hdr, short user_hdrs,
                                    short weed)
 {
-  ENVELOPE *e = mutt_new_envelope ();
+  ENVELOPE *e = envelope_new();
   LIST *last = NULL;
   char *line = p_new(char, LONG_STRING);
   char *p;