diff src/address.c @ 0:08114f7dcc23 0.2.21

this is masqmail-0.2.21 from oliver kurth
author meillo@marmaro.de
date Fri, 26 Sep 2008 17:05:23 +0200
parents
children 26e34ae9a3e3
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/address.c	Fri Sep 26 17:05:23 2008 +0200
@@ -0,0 +1,189 @@
+/*  MasqMail
+    Copyright (C) 1999-2001 Oliver Kurth
+
+    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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+#include "masqmail.h"
+#include <fnmatch.h>
+
+address *create_address(gchar *path, gboolean is_rfc821)
+{
+  address *addr;
+  addr = _create_address(path, NULL, is_rfc821);
+  
+  if(addr != NULL){
+    addr_unmark_delivered(addr);
+  }
+  return addr;
+}
+
+address *create_address_qualified(gchar *path, gboolean is_rfc821,
+				  gchar *domain)
+{
+  address *addr = create_address(path, is_rfc821);
+  if(addr != NULL){
+    if(addr->domain == NULL)
+      addr->domain = g_strdup(domain);
+  }
+
+  return addr;
+}
+
+/* nothing special about pipes here,
+   but its only called for that purpose */
+address *create_address_pipe(gchar *path)
+{
+  address *addr = g_malloc(sizeof(address));
+
+  if(addr){
+    memset(addr, 0, sizeof(address));
+    addr->address = g_strchomp(g_strdup(path));
+    addr->local_part = g_strdup(addr->address);
+  
+    addr->domain = g_strdup("localhost"); /* quick hack */
+  }
+  return addr;
+}
+
+void destroy_address(address *addr)
+{
+  DEBUG(6) debugf("destroy_address entered\n");
+
+  g_free(addr->address);
+  g_free(addr->local_part);
+  g_free(addr->domain);
+
+  g_free(addr);
+}
+
+address *copy_modify_address(const address *orig, gchar *l_part, gchar *dom)
+{
+  address *addr = NULL;
+
+  if(orig){
+    addr = g_malloc(sizeof(address));
+    if(addr){
+      addr->address = g_strdup(orig->address);
+
+      if(l_part == NULL)
+	addr->local_part = g_strdup(orig->local_part);
+      else
+	addr->local_part = g_strdup(l_part);
+
+      if(dom == NULL)
+	addr->domain = g_strdup(orig->domain);
+      else
+	addr->domain = g_strdup(dom);
+
+      addr->flags = 0;
+      addr->children = NULL;
+      addr->parent = NULL;
+    }
+  }
+  return addr;
+}
+
+gboolean addr_isequal(address *addr1, address *addr2)
+{
+  return
+    (strcmp(addr1->local_part, addr2->local_part) == 0) &&
+    (strcasecmp(addr1->domain, addr2->domain) == 0);
+}
+
+/* searches in ancestors of addr1 */
+gboolean addr_isequal_parent(address *addr1, address *addr2)
+{
+  address *addr;
+
+  for(addr = addr1; addr; addr = addr->parent)
+    if(addr_isequal(addr, addr2))
+      return TRUE;
+
+  return FALSE;
+}
+
+/* careful, this is recursive */
+/* returns TRUE if ALL children have been delivered */
+gboolean addr_is_delivered_children(address *addr)
+{
+  GList *addr_node;
+
+  if(addr->children == NULL) return addr_is_delivered(addr);
+
+  foreach(addr->children, addr_node){
+    address *addr = (address *)(addr_node->data);
+    if(!addr_is_delivered_children(addr))
+      return FALSE;
+  }
+  return TRUE;
+}
+
+/* careful, this is recursive */
+/* returns TRUE if ALL children have been either delivered or have failed */
+gboolean addr_is_finished_children(address *addr)
+{
+  GList *addr_node;
+
+  if(addr->children == NULL) return (addr_is_failed(addr) || addr_is_delivered(addr));
+
+  foreach(addr->children, addr_node){
+    address *addr = (address *)(addr_node->data);
+    if(!addr_is_finished_children(addr))
+      return FALSE;
+  }
+  return TRUE;
+}
+
+/* find original address */
+address *addr_find_ancestor(address *addr)
+{
+  while(addr->parent) addr = addr->parent;
+  return addr;
+}
+
+gchar *addr_string(address *addr)
+{
+  static gchar *buffer = NULL;
+
+  if(addr == NULL){
+    g_free(buffer);
+    buffer = NULL;
+    return NULL;
+  }
+  if(buffer)
+    g_free(buffer);
+
+  if(addr->local_part[0] == 0){
+    buffer = g_strdup("<>");
+  }else{
+    buffer = g_strdup_printf("<%s@%s>",
+			     addr->local_part ? addr->local_part : "",
+			     addr->domain ? addr->domain : "");
+  }
+  return buffer;
+}
+
+gint addr_match(address *addr1, address *addr2)
+{
+  int res;
+
+  if((res = fnmatch(addr1->local_part, addr2->local_part, 0)) == 0){
+    if((res = fnmatch(addr1->domain, addr2->domain, FNM_CASEFOLD)) == 0)
+      return 0;
+  }
+  return res;
+}
+