masqmail

annotate src/address.c @ 216:84bf7a6b6ccd

find changesets by author, revision, files, or words in the commit message
added misc/list-versions This script helps to check if the versions numbers in the project are the same as the one for the release. This script is motivated by the 0.2.27 release in which masqmail introduces itself as being version 0.2.26.
author meillo@marmaro.de
date Mon, 19 Jul 2010 14:01:13 +0200
parents a8f3424347dc
children bc9d9cd9ee8e
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@10 105 addr_isequal(address * addr1, address * addr2)
meillo@0 106 {
meillo@13 107 return (strcmp(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@10 113 addr_isequal_parent(address * addr1, address * addr2)
meillo@0 114 {
meillo@10 115 address *addr;
meillo@0 116
meillo@10 117 for (addr = addr1; addr; addr = addr->parent)
meillo@10 118 if (addr_isequal(addr, addr2))
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 }