/*  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.
*/

#ifndef REWRITE_TEST
#include "masqmail.h"
#endif

gboolean set_address_header_domain(header *hdr, gchar *domain)
{
  gchar *p = hdr->value;
  gchar *new_hdr = g_strndup(hdr->header, hdr->value - hdr->header);
  gint tmp;

  while(*p){
    gchar *loc_beg, *loc_end;
    gchar *dom_beg, *dom_end;
    gchar *addr_end;
    gchar *rewr_string;

    if(parse_address_rfc822(p,
			    &loc_beg, &loc_end, &dom_beg, &dom_end, &addr_end)){
      gchar *left, *right;

      if(dom_beg != NULL){
	left = g_strndup(p, dom_beg - p);
	right = g_strndup(dom_end, addr_end - dom_end);

	rewr_string = g_strconcat(left, domain, right, NULL);
      }else{
	left = g_strndup(p, loc_end - p);
	right = g_strndup(loc_end, addr_end - loc_end);

	rewr_string = g_strconcat(left, "@", domain, right, NULL);
      }
      g_free(left);
      g_free(right);

      p = addr_end;
      if(*p == ',') p++;

      new_hdr =
	g_strconcat(new_hdr, rewr_string,
		    *p != 0 ? "," : NULL, NULL);

    }else
      return FALSE;
  }
  tmp = (hdr->value - hdr->header);
  g_free(hdr->header);
  hdr->header = new_hdr;
  hdr->value = hdr->header + tmp;

  return TRUE;
}

gboolean map_address_header(header *hdr, GList *table)
{
  GList *addr_list = addr_list_append_rfc822(NULL, hdr->value, conf.host_name);
  GList *addr_node;
  gchar *new_hdr = g_strndup(hdr->header, hdr->value - hdr->header);
  gboolean did_change = FALSE;

  foreach(addr_list, addr_node){
    address *addr = (address *)(addr_node->data);
    gchar *rewr_string = (gchar *)table_find_fnmatch(table, addr->local_part);

    if(rewr_string == NULL)
      rewr_string = addr->address;
    else
      did_change = TRUE;

    if(rewr_string)
      new_hdr =
	g_strconcat(new_hdr, rewr_string,
		    g_list_next(addr_node) ? "," : "\n", NULL);
  }
  if(did_change){
    g_free(hdr->header);
    hdr->header = new_hdr;
  }else
    g_free(new_hdr);

  return did_change;
}