*
* 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 "mime.h"
+
+#define BOUNDARYLEN 16
const char MimeSpecials[] = "@.,;:<>[]\\\"()?/= \t";
"x-uuencoded",
};
+/****************************************************************************/
+/* rfc822 header parameters */
+/****************************************************************************/
+
+char *parameter_getval(parameter_t *parm, const char *s)
+{
+ while (parm) {
+ if (!ascii_strcasecmp(parm->attribute, s))
+ return parm->value;
+ parm = parm->next;
+ }
+ return NULL;
+}
+
+void parameter_setval(parameter_t **p, const char *attribute, const char *value)
+{
+ while (*p) {
+ if (!ascii_strcasecmp(attribute, (*p)->attribute)) {
+ if (value) {
+ m_strreplace(&(*p)->value, value);
+ } else {
+ parameter_t *q = parameter_list_pop(p);
+ parameter_delete(&q);
+ }
+ return;
+ }
+ p = &(*p)->next;
+ }
+
+ if (value) {
+ (*p) = parameter_new();
+ (*p)->attribute = m_strdup(attribute);
+ (*p)->value = m_strdup(value);
+ }
+}
+
+void parameter_delval(parameter_t **p, const char *attribute)
+{
+ while (*p) {
+ if (!ascii_strcasecmp(attribute, (*p)->attribute)) {
+ parameter_t *q = parameter_list_pop(p);
+ parameter_delete(&q);
+ return;
+ }
+
+ p = &(*p)->next;
+ }
+}
+
+int parameter_equal(const parameter_t *p1, const parameter_t *p2)
+{
+ while (p1 && p2) {
+ if (m_strcmp(p1->attribute, p2->attribute)
+ || m_strcmp(p1->value, p2->value))
+ return 0;
+
+ p1 = p1->next;
+ p2 = p2->next;
+ }
+
+ if (p1 || p2)
+ return 0;
+
+ return 1;
+}
+
+void parameter_set_boundary(parameter_t **parm)
+{
+ char rs[BOUNDARYLEN + 1];
+ int i;
+
+ for (i = 0; i < BOUNDARYLEN; i++) {
+ rs[i] = __m_b64chars[lrand48() % sizeof(__m_b64chars)];
+ }
+ rs[BOUNDARYLEN] = '\0';
+
+ parameter_setval(parm, "boundary", rs);
+}
+
+
+/****************************************************************************/
+/* XXX */
+/****************************************************************************/
+
+void envelope_wipe(ENVELOPE *p)
+{
+ address_list_wipe(&p->return_path);
+ address_list_wipe(&p->from);
+ address_list_wipe(&p->to);
+ address_list_wipe(&p->cc);
+ address_list_wipe(&p->bcc);
+ address_list_wipe(&p->sender);
+ address_list_wipe(&p->reply_to);
+ address_list_wipe(&p->mail_followup_to);
+
+ p_delete(&p->list_post);
+ p_delete(&p->subject);
+ /* real_subj is just an offset to subject and shouldn't be freed */
+ p_delete(&p->message_id);
+ p_delete(&p->supersedes);
+ p_delete(&p->date);
+ p_delete(&p->x_label);
+ p_delete(&p->organization);
+#ifdef USE_NNTP
+ p_delete(&p->newsgroups);
+ p_delete(&p->xref);
+ p_delete(&p->followup_to);
+ p_delete(&p->x_comment_to);
+#endif
+
+ mutt_buffer_free (&p->spam);
+ string_list_wipe(&p->references);
+ string_list_wipe(&p->in_reply_to);
+ string_list_wipe(&p->userhdrs);
+}
+
+void body_wipe(BODY *b)
+{
+ if (b->parameter)
+ parameter_list_wipe(&b->parameter);
+
+ if (b->unlink && b->filename) {
+ unlink (b->filename);
+ }
+
+ p_delete(&b->filename);
+ p_delete(&b->content);
+ p_delete(&b->xtype);
+ p_delete(&b->subtype);
+ p_delete(&b->description);
+ p_delete(&b->form_name);
+
+ if (b->hdr) {
+ /* Don't free twice (b->hdr->content = b->parts) */
+ b->hdr->content = NULL;
+ header_delete(&b->hdr);
+ }
+
+ if (b->parts)
+ body_list_wipe(&b->parts);
+}
+
+void header_wipe(HEADER *h)
+{
+ envelope_delete(&h->env);
+ body_list_wipe(&h->content);
+ 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_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;
+ char *tmp;
+ char *headers;
+ char *tag, *value;
+ char scratch[HUGE_STRING];
+
+ int taglen;
+
+ string_list_t **last = &e->userhdrs;
+
+ if (!(t = strchr (src, ':')))
+ return -1;
+
+ if ((tmp = m_strdup(t + 1)) == NULL)
+ return -1;
+
+ if ((headers = strchr (tmp, '?')))
+ *headers++ = '\0';
+
+ url_decode(tmp);
+ e->to = rfc822_parse_adrlist(e->to, tmp);
+
+ tag = headers ? strtok (headers, "&") : NULL;
+
+ for (; tag; tag = strtok(NULL, "&")) {
+ if ((value = strchr (tag, '=')))
+ *value++ = '\0';
+ if (!value || !*value)
+ continue;
+
+ url_decode (tag);
+ url_decode (value);
+
+ 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) + strlen(SAFEPFX);
+ /* mutt_parse_rfc822_line makes some assumptions */
+ 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);
+ /* if $strict_mailto is set, force editing headers to let
+ * users have a look at what we got */
+ if (!option (OPTSTRICTMAILTO)) {
+ set_option (OPTXMAILTO);
+ set_option (OPTEDITHDRS);
+ }
+ }
+ }
+
+ p_delete(&tmp);
+ return 0;
+}
projects / apps / madmutt.git / blobdiff