masqmail-0.2

annotate src/address.c @ 12:9fb7ddbaf129

find changesets by author, revision, files, or words in the commit message
removed noop-code; some beautifying
author meillo@marmaro.de
date Wed, 29 Oct 2008 16:34:13 +0100
parents 08114f7dcc23
children 49dab67fe461
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@10 38 if (addr != NULL) {
meillo@10 39 if (addr->domain == NULL)
meillo@10 40 addr->domain = g_strdup(domain);
meillo@10 41 }
meillo@0 42
meillo@10 43 return addr;
meillo@0 44 }
meillo@0 45
meillo@0 46 /* nothing special about pipes here,
meillo@0 47 but its only called for that purpose */
meillo@10 48 address*
meillo@10 49 create_address_pipe(gchar * path)
meillo@0 50 {
meillo@10 51 address *addr = g_malloc(sizeof(address));
meillo@0 52
meillo@10 53 if (addr) {
meillo@10 54 memset(addr, 0, sizeof(address));
meillo@10 55 addr->address = g_strchomp(g_strdup(path));
meillo@10 56 addr->local_part = g_strdup(addr->address);
meillo@10 57
meillo@10 58 addr->domain = g_strdup("localhost"); /* quick hack */
meillo@10 59 }
meillo@10 60 return addr;
meillo@0 61 }
meillo@0 62
meillo@10 63 void
meillo@10 64 destroy_address(address * addr)
meillo@0 65 {
meillo@10 66 DEBUG(6) debugf("destroy_address entered\n");
meillo@0 67
meillo@10 68 g_free(addr->address);
meillo@10 69 g_free(addr->local_part);
meillo@10 70 g_free(addr->domain);
meillo@0 71
meillo@10 72 g_free(addr);
meillo@0 73 }
meillo@0 74
meillo@10 75 address*
meillo@10 76 copy_modify_address(const address * orig, gchar * l_part, gchar * dom)
meillo@0 77 {
meillo@10 78 address *addr = NULL;
meillo@0 79
meillo@10 80 if (orig) {
meillo@10 81 addr = g_malloc(sizeof(address));
meillo@10 82 if (addr) {
meillo@10 83 addr->address = g_strdup(orig->address);
meillo@0 84
meillo@10 85 if (l_part == NULL)
meillo@10 86 addr->local_part = g_strdup(orig->local_part);
meillo@10 87 else
meillo@10 88 addr->local_part = g_strdup(l_part);
meillo@0 89
meillo@10 90 if (dom == NULL)
meillo@10 91 addr->domain = g_strdup(orig->domain);
meillo@10 92 else
meillo@10 93 addr->domain = g_strdup(dom);
meillo@0 94
meillo@10 95 addr->flags = 0;
meillo@10 96 addr->children = NULL;
meillo@10 97 addr->parent = NULL;
meillo@10 98 }
meillo@10 99 }
meillo@10 100 return addr;
meillo@0 101 }
meillo@0 102
meillo@10 103 gboolean
meillo@10 104 addr_isequal(address * addr1, address * addr2)
meillo@0 105 {
meillo@10 106 return
meillo@10 107 (strcmp(addr1->local_part, addr2->local_part) == 0) &&
meillo@10 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@10 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 }