masqmail

annotate src/address.c @ 281:ea5f86e0a81c

find changesets by author, revision, files, or words in the commit message
modes are now enforced exclusive Other MTAs (exim, postfix) are more relaxing, but as combinations of exclusive modes are senseless we behave more obvious if we fail early. This makes understanding the behavior easier too.
author markus schnalke <meillo@marmaro.de>
date Tue, 07 Dec 2010 14:04:56 -0300
parents 4a3bc3a7afbe
children 55b7bde95d37
rev   line source
meillo@0 1 /* MasqMail
meillo@0 2 Copyright (C) 1999-2001 Oliver Kurth
meillo@0 3
meillo@0 4 This program is free software; you can redistribute it and/or modify
meillo@0 5 it under the terms of the GNU General Public License as published by
meillo@0 6 the Free Software Foundation; either version 2 of the License, or
meillo@0 7 (at your option) any later version.
meillo@0 8
meillo@0 9 This program is distributed in the hope that it will be useful,
meillo@0 10 but WITHOUT ANY WARRANTY; without even the implied warranty of
meillo@0 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
meillo@0 12 GNU General Public License for more details.
meillo@0 13
meillo@0 14 You should have received a copy of the GNU General Public License
meillo@0 15 along with this program; if not, write to the Free Software
meillo@0 16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
meillo@0 17 */
meillo@0 18
meillo@0 19 #include "masqmail.h"
meillo@0 20 #include <fnmatch.h>
meillo@0 21
meillo@10 22 address*
meillo@10 23 create_address(gchar * path, gboolean is_rfc821)
meillo@0 24 {
meillo@10 25 address *addr;
meillo@10 26 addr = _create_address(path, NULL, is_rfc821);
meillo@10 27
meillo@10 28 if (addr != NULL) {
meillo@10 29 addr_unmark_delivered(addr);
meillo@10 30 }
meillo@10 31 return addr;
meillo@0 32 }
meillo@0 33
meillo@10 34 address*
meillo@10 35 create_address_qualified(gchar * path, gboolean is_rfc821, gchar * domain)
meillo@0 36 {
meillo@10 37 address *addr = create_address(path, is_rfc821);
meillo@23 38
meillo@23 39 if (addr != NULL && addr->domain == NULL) {
meillo@10 40 addr->domain = g_strdup(domain);
meillo@10 41 }
meillo@10 42 return addr;
meillo@0 43 }
meillo@0 44
meillo@13 45 /* nothing special about pipes here, but its only called for that purpose */
meillo@10 46 address*
meillo@10 47 create_address_pipe(gchar * path)
meillo@0 48 {
meillo@10 49 address *addr = g_malloc(sizeof(address));
meillo@0 50
meillo@10 51 if (addr) {
meillo@10 52 memset(addr, 0, sizeof(address));
meillo@10 53 addr->address = g_strchomp(g_strdup(path));
meillo@10 54 addr->local_part = g_strdup(addr->address);
meillo@10 55
meillo@10 56 addr->domain = g_strdup("localhost"); /* quick hack */
meillo@10 57 }
meillo@10 58 return addr;
meillo@0 59 }
meillo@0 60
meillo@10 61 void
meillo@10 62 destroy_address(address * addr)
meillo@0 63 {
meillo@10 64 DEBUG(6) debugf("destroy_address entered\n");
meillo@0 65
meillo@10 66 g_free(addr->address);
meillo@10 67 g_free(addr->local_part);
meillo@10 68 g_free(addr->domain);
meillo@0 69
meillo@10 70 g_free(addr);
meillo@0 71 }
meillo@0 72
meillo@10 73 address*
meillo@10 74 copy_modify_address(const address * orig, gchar * l_part, gchar * dom)
meillo@0 75 {
meillo@10 76 address *addr = NULL;
meillo@0 77
meillo@23 78 if (!orig) {
meillo@23 79 return NULL;
meillo@23 80 }
meillo@0 81
meillo@23 82 if ((addr = g_malloc(sizeof(address))) == NULL) {
meillo@23 83 return NULL;
meillo@23 84 }
meillo@0 85
meillo@23 86 addr->address = g_strdup(orig->address);
meillo@0 87
meillo@23 88 if (l_part == NULL)
meillo@23 89 addr->local_part = g_strdup(orig->local_part);
meillo@23 90 else
meillo@23 91 addr->local_part = g_strdup(l_part);
meillo@23 92
meillo@23 93 if (dom == NULL)
meillo@23 94 addr->domain = g_strdup(orig->domain);
meillo@23 95 else
meillo@23 96 addr->domain = g_strdup(dom);
meillo@23 97
meillo@23 98 addr->flags = 0;
meillo@23 99 addr->children = NULL;
meillo@23 100 addr->parent = NULL;
meillo@10 101 return addr;
meillo@0 102 }
meillo@0 103
meillo@10 104 gboolean
meillo@242 105 addr_isequal(address * addr1, address * addr2, int (*cmpfunc) (const char*, const char*))
meillo@0 106 {
meillo@242 107 return (cmpfunc(addr1->local_part, addr2->local_part) == 0)
meillo@13 108 && (strcasecmp(addr1->domain, addr2->domain) == 0);
meillo@0 109 }
meillo@0 110
meillo@0 111 /* searches in ancestors of addr1 */
meillo@10 112 gboolean
meillo@242 113 addr_isequal_parent(address* addr1, address* addr2, int (*cmpfunc) (const char*, const char*))
meillo@0 114 {
meillo@10 115 address *addr;
meillo@0 116
meillo@10 117 for (addr = addr1; addr; addr = addr->parent)
meillo@242 118 if (addr_isequal(addr, addr2, cmpfunc))
meillo@10 119 return TRUE;
meillo@0 120
meillo@10 121 return FALSE;
meillo@0 122 }
meillo@0 123
meillo@0 124 /* careful, this is recursive */
meillo@0 125 /* returns TRUE if ALL children have been delivered */
meillo@10 126 gboolean
meillo@10 127 addr_is_delivered_children(address * addr)
meillo@0 128 {
meillo@10 129 GList *addr_node;
meillo@0 130
meillo@10 131 if (addr->children == NULL)
meillo@10 132 return addr_is_delivered(addr);
meillo@0 133
meillo@10 134 foreach(addr->children, addr_node) {
meillo@10 135 address *addr = (address *) (addr_node->data);
meillo@10 136 if (!addr_is_delivered_children(addr))
meillo@10 137 return FALSE;
meillo@10 138 }
meillo@10 139 return TRUE;
meillo@0 140 }
meillo@0 141
meillo@0 142 /* careful, this is recursive */
meillo@0 143 /* returns TRUE if ALL children have been either delivered or have failed */
meillo@10 144 gboolean
meillo@10 145 addr_is_finished_children(address * addr)
meillo@0 146 {
meillo@10 147 GList *addr_node;
meillo@0 148
meillo@10 149 if (addr->children == NULL)
meillo@10 150 return (addr_is_failed(addr) || addr_is_delivered(addr));
meillo@0 151
meillo@10 152 foreach(addr->children, addr_node) {
meillo@10 153 address *addr = (address *) (addr_node->data);
meillo@10 154 if (!addr_is_finished_children(addr))
meillo@10 155 return FALSE;
meillo@10 156 }
meillo@10 157 return TRUE;
meillo@0 158 }
meillo@0 159
meillo@0 160 /* find original address */
meillo@10 161 address*
meillo@10 162 addr_find_ancestor(address * addr)
meillo@0 163 {
meillo@10 164 while (addr->parent)
meillo@10 165 addr = addr->parent;
meillo@10 166 return addr;
meillo@0 167 }
meillo@0 168
meillo@10 169 gchar*
meillo@10 170 addr_string(address * addr)
meillo@0 171 {
meillo@10 172 static gchar *buffer = NULL;
meillo@0 173
meillo@10 174 if (addr == NULL) {
meillo@10 175 g_free(buffer);
meillo@10 176 buffer = NULL;
meillo@10 177 return NULL;
meillo@10 178 }
meillo@10 179 if (buffer)
meillo@10 180 g_free(buffer);
meillo@0 181
meillo@14 182 if (addr->local_part[0] == '\0') {
meillo@10 183 buffer = g_strdup("<>");
meillo@10 184 } else {
meillo@10 185 buffer = g_strdup_printf("<%s@%s>", addr->local_part ? addr->local_part : "", addr->domain ? addr->domain : "");
meillo@10 186 }
meillo@10 187 return buffer;
meillo@0 188 }
meillo@0 189
meillo@10 190 gint
meillo@10 191 addr_match(address * addr1, address * addr2)
meillo@0 192 {
meillo@10 193 int res;
meillo@0 194
meillo@10 195 if ((res = fnmatch(addr1->local_part, addr2->local_part, 0)) == 0) {
meillo@10 196 if ((res = fnmatch(addr1->domain, addr2->domain, FNM_CASEFOLD)) == 0)
meillo@10 197 return 0;
meillo@10 198 }
meillo@10 199 return res;
meillo@0 200 }