+/*
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or (at
+ * your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+ * MA 02110-1301, USA.
+ *
+ * Copyright © 2006 Pierre Habouzit
+ */
/*
* Copyright notice from original mutt:
* Copyright (C) 1996-2002 Michael R. Elkins <me@mutt.org>
* please see the file GPL in the top level source directory.
*/
-#if HAVE_CONFIG_H
-# include "config.h"
-#endif
-
-#include <string.h>
-#include <ctype.h>
-
-#include <lib-lib/mem.h>
-#include <lib-lib/ascii.h>
-#include <lib-lib/str.h>
-#include <lib-lib/file.h>
-#include <lib-lib/macros.h>
-#include <lib-lib/mapping.h>
-#include <lib-lib/debug.h>
-#include <lib-lib/rx.h>
+#include <lib-lib/lib-lib.h>
#include <lib-sys/unix.h>
#include <lib-ui/enter.h>
#include <lib-ui/menu.h>
-#include "mutt.h"
+#include "alias.h"
#include "mutt_idna.h"
#include "sort.h"
+char *AliasFmt;
+char *AliasFile;
+alias_t *Aliases;
+rx_t GecosMask;
+
#define RSORT(x) (SortAlias & SORT_REVERSE) ? -x : x
static struct mapping_t AliasHelp[] = {
{NULL, OP_NULL}
};
-void alias_wipe(alias_t *a) {
- p_delete(&a->name);
- address_delete(&a->addr);
- alias_delete(&a->next);
-}
+static void mutt_alias_menu(char *, size_t, alias_t *);
-address_t *alias_lookup(alias_t *list, const char *s)
+const address_t *alias_lookup(const char *s)
{
- while (list) {
+ alias_t *list;
+
+ for (list = Aliases; list; list = list->next) {
if (!m_strcasecmp(s, list->name))
return list->addr;
- list = list->next;
+ }
+
+ return NULL;
+}
+
+/* This routine looks to see if the user has an alias defined for the given
+ address. */
+const address_t *alias_reverse_lookup(const address_t *a)
+{
+ alias_t *list;
+
+ if (!a || !a->mailbox)
+ return NULL;
+
+ for (list = Aliases; list; list = list->next) {
+ address_t *ap;
+
+ /* cycle through all addresses if this is a group alias */
+ for (ap = list->addr; ap; ap = ap->next) {
+ if (!ap->group && ap->mailbox
+ && !ascii_strcasecmp(ap->mailbox, a->mailbox))
+ return ap;
+ }
}
return NULL;
void mutt_create_alias(ENVELOPE *cur, address_t *iadr)
{
- char buf[LONG_STRING], prompt[SHORT_STRING];
+ char buf[LONG_STRING], prompt[STRING];
address_t *adr = iadr;
alias_t *new;
FILE *rc;
return;
/* check to see if the user already has an alias defined */
- if (alias_lookup(Aliases, buf)) {
+ if (alias_lookup(buf)) {
mutt_error _("You already have an alias defined with that name!");
return;
}
mutt_addrlist_to_idna(adr, NULL);
do {
- const char *err = NULL;
+ char *err = NULL;
if (mutt_get_field(_("Address: "), buf, sizeof(buf), 0) || !buf[0]) {
- alias_delete(&new);
+ alias_list_wipe(&new);
return;
}
if (mutt_addrlist_to_idna(new->addr, &err)) {
mutt_error(_("Error: '%s' is a bad IDN."), err);
+ p_delete(&err);
mutt_sleep(1);
continue;
}
}
if (mutt_get_field(_("Personal name: "), buf, sizeof(buf), 0)) {
- alias_delete(&new);
+ alias_list_wipe(&new);
return;
}
new->addr->personal = m_strdup(buf);
buf[0] = '\0';
- rfc822_write_address(buf, sizeof(buf), new->addr, 1);
+ rfc822_addrcat(buf, sizeof(buf), new->addr, 1);
snprintf(prompt, sizeof(prompt), _("[%s = %s] Accept?"), new->name, buf);
if (mutt_yesorno(prompt, M_YES) != M_YES) {
- alias_delete(&new);
+ alias_list_wipe(&new);
return;
}
}
buf[0] = '\0';
- rfc822_write_address(buf, sizeof(buf), new->addr, 0);
+ rfc822_addrcat(buf, sizeof(buf), new->addr, 0);
write_safe_address(rc, buf);
- fclose(rc);
+ m_fclose(&rc);
mutt_message _("Alias added.");
} else {
mutt_perror(buf);
}
}
-/************* READ MARK *********************/
-
-static address_t *mutt_expand_aliases_r (address_t * a, LIST ** expn)
+static address_t *mutt_expand_aliases_r(address_t *a, string_list_t **expn)
{
- address_t *head = NULL, *last = NULL, *t, *w;
- LIST *u;
- char i;
- const char *fqdn;
-
- while (a) {
- if (!a->group && !a->personal && a->mailbox
- && strchr (a->mailbox, '@') == NULL) {
- t = alias_lookup(Aliases, a->mailbox);
-
- if (t) {
- i = 0;
- for (u = *expn; u; u = u->next) {
- if (m_strcmp(a->mailbox, u->data) == 0) { /* alias already found */
- debug_print(1, ("loop in alias found for '%s'\n", a->mailbox));
- i = 1;
- break;
- }
- }
-
- if (!i) {
- u = p_new(LIST, 1);
- u->data = m_strdup(a->mailbox);
- u->next = *expn;
- *expn = u;
- w = address_list_dup (t);
- w = mutt_expand_aliases_r (w, expn);
- if (head)
- last->next = w;
- else
- head = last = w;
- while (last && last->next)
- last = last->next;
+ address_t *pop, *head = NULL;
+ address_t **last = &head;
+
+ while ((pop = address_list_pop(&a))) {
+ if (!pop->group && !pop->personal
+ && pop->mailbox && !strchr(pop->mailbox, '@'))
+ {
+ const address_t *t = alias_lookup(pop->mailbox);
+
+ if (t) {
+ string_list_t *u;
+
+ for (u = *expn; u; u = u->next) {
+ if (!m_strcmp(pop->mailbox, u->data)) { /* alias already found */
+ address_list_wipe(&pop);
+ continue;
+ }
+ }
+
+ /* save the fact we saw it */
+ u = string_item_new();
+ u->data = m_strdup(pop->mailbox);
+ u->next = *expn;
+ *expn = u;
+ address_list_wipe(&pop);
+
+ /* recurse */
+ last = address_list_last(last);
+ *last = mutt_expand_aliases_r(address_list_dup(t), expn);
+ continue;
+ } else {
+ struct passwd *pw = getpwnam(pop->mailbox);
+
+ if (pw) {
+ char namebuf[STRING];
+ mutt_gecos_name(namebuf, sizeof(namebuf), pw, GecosMask.rx);
+ m_strreplace(&pop->personal, namebuf);
+ }
+ }
}
- t = a;
- a = a->next;
- t->next = NULL;
- address_delete (&t);
- continue;
- }
- else {
- struct passwd *pw = getpwnam (a->mailbox);
-
- if (pw) {
- char namebuf[STRING];
- mutt_gecos_name(namebuf, sizeof (namebuf), pw, GecosMask.rx);
- m_strreplace(&a->personal, namebuf);
- }
- }
+ last = address_list_append(last, pop);
}
- if (head) {
- last->next = a;
- last = last->next;
+ if (option(OPTUSEDOMAIN)) {
+ /* now qualify all local addresses */
+ rfc822_qualify(head, mutt_fqdn(1));
}
- else
- head = last = a;
- a = a->next;
- last->next = NULL;
- }
- if (option (OPTUSEDOMAIN) && (fqdn = mutt_fqdn (1))) {
- /* now qualify all local addresses */
- rfc822_qualify (head, fqdn);
- }
-
- return (head);
+ return head;
}
-address_t *mutt_expand_aliases (address_t * a)
+address_t *mutt_expand_aliases(address_t *a)
{
- address_t *t;
- LIST *expn = NULL; /* previously expanded aliases to avoid loops */
+ address_t *t;
+ string_list_t *expn = NULL; /* previously expanded aliases to avoid loops */
- t = mutt_expand_aliases_r (a, &expn);
- mutt_free_list (&expn);
- return (mutt_remove_duplicates (t));
+ t = mutt_expand_aliases_r(a, &expn);
+ string_list_wipe(&expn);
+ address_list_uniq(t);
+ return t;
}
-void mutt_expand_aliases_env (ENVELOPE * env)
+void mutt_expand_aliases_env(ENVELOPE *env)
{
- env->from = mutt_expand_aliases (env->from);
- env->to = mutt_expand_aliases (env->to);
- env->cc = mutt_expand_aliases (env->cc);
- env->bcc = mutt_expand_aliases (env->bcc);
- env->reply_to = mutt_expand_aliases (env->reply_to);
- env->mail_followup_to = mutt_expand_aliases (env->mail_followup_to);
+ env->from = mutt_expand_aliases(env->from);
+ env->to = mutt_expand_aliases(env->to);
+ env->cc = mutt_expand_aliases(env->cc);
+ env->bcc = mutt_expand_aliases(env->bcc);
+ env->reply_to = mutt_expand_aliases(env->reply_to);
+ env->mail_followup_to = mutt_expand_aliases(env->mail_followup_to);
}
-
-/*
- * This routine looks to see if the user has an alias defined for the given
- * address.
- */
-address_t *alias_reverse_lookup (address_t * a)
-{
- alias_t *t = Aliases;
- address_t *ap;
-
- if (!a || !a->mailbox)
- return NULL;
-
- for (; t; t = t->next) {
- /* cycle through all addresses if this is a group alias */
- for (ap = t->addr; ap; ap = ap->next) {
- if (!ap->group && ap->mailbox &&
- ascii_strcasecmp (ap->mailbox, a->mailbox) == 0)
- return ap;
- }
- }
- return 0;
-}
+/************* READ MARK *********************/
/* alias_complete() -- alias completion routine
*
Aliases = a_cur->next;
a_cur->next = NULL;
- alias_delete(&a_cur);
+ alias_list_wipe(&a_cur);
if (a_list)
a_cur = a_list;
const char *elsestring __attribute__ ((unused)),
unsigned long data, format_flag flags __attribute__ ((unused)))
{
- char tmp[SHORT_STRING], adr[SHORT_STRING];
+ char tmp[STRING], adr[STRING];
alias_t *alias = (alias_t *) data;
switch (op) {
break;
case 'r':
adr[0] = '\0';
- rfc822_write_address(adr, sizeof(adr), alias->addr, 1);
+ rfc822_addrcat(adr, sizeof(adr), alias->addr, 1);
snprintf(tmp, sizeof(tmp), "%%%ss", fmt);
snprintf(dest, destlen, tmp, adr);
break;
static void alias_entry (char *s, ssize_t slen, MUTTMENU * m, int num)
{
- mutt_FormatString (s, slen, NONULL (AliasFmt), (format_t *)alias_format_str,
+ m_strformat (s, slen, NONULL (AliasFmt), (format_t *)alias_format_str,
(unsigned long)((alias_t **)m->data)[num],
M_FORMAT_ARROWCURSOR);
}
int t = -1;
int i, done = 0;
int op;
- char helpstr[SHORT_STRING];
+ char helpstr[STRING];
int omax;
for (i = 0; i < menu->max; i++) {
if (AliasTable[i]->tagged) {
mutt_addrlist_to_local (AliasTable[i]->addr);
- rfc822_write_address (buf, buflen, AliasTable[i]->addr, 0);
+ rfc822_addrcat(buf, buflen, AliasTable[i]->addr, 0);
t = -1;
}
}
if (t != -1) {
mutt_addrlist_to_local (AliasTable[t]->addr);
- rfc822_write_address (buf, buflen, AliasTable[t]->addr, 0);
+ rfc822_addrcat(buf, buflen, AliasTable[t]->addr, 0);
}
mutt_menuDestroy (&menu);
p_delete(&AliasTable);
-
}