/* $Id$ */
/*
 ** Copyright 1998 - 1999 Double Precision, Inc.
 ** See COPYING for distribution information.
 */

#include "php.h"
#include "php_mailparse.h"

static void cntlen(char c, void *p)
{
	if (c != '\n')
		++ *(size_t *)p;
}

static void saveaddr(char c, void *p)
{
	if (c != '\n')
	{
		char **cp=(char **)p;

		*(*cp)++=c;
	}
}

char *mailparse_rfc822_getaddr(const struct rfc822a *rfc, int n)
{
	size_t	addrbuflen=0;
	char	*addrbuf, *ptr;

	mailparse_rfc822_praddr(rfc, n, &cntlen, &addrbuflen);
	if (!(addrbuf=emalloc(addrbuflen+1)))
		return (0);

	ptr=addrbuf;
	mailparse_rfc822_praddr(rfc, n, &saveaddr, &ptr);
	addrbuf[addrbuflen]=0;
	return (addrbuf);
}

char *mailparse_rfc822_getname(const struct rfc822a *rfc, int n)
{
	char	*p, *q;
	size_t	addrbuflen=0;
	char	*addrbuf, *ptr;

	mailparse_rfc822_prname(rfc, n, &cntlen, &addrbuflen);
	if (!(addrbuf=emalloc(addrbuflen+1)))
		return (0);

	ptr=addrbuf;
	mailparse_rfc822_prname(rfc, n, &saveaddr, &ptr);
	addrbuf[addrbuflen]=0;

	/* Get rid of surrounding quotes */

	for (p=q=addrbuf; *p; p++)
		if (*p != '"')	*q++=*p;
	*q=0;
	return (addrbuf);
}

char *mailparse_rfc822_getname_orlist(const struct rfc822a *rfc, int n)
{
	char	*p, *q;
	size_t	addrbuflen=0;
	char	*addrbuf, *ptr;

	mailparse_rfc822_prname_orlist(rfc, n, &cntlen, &addrbuflen);
	if (!(addrbuf=emalloc(addrbuflen+1)))
		return (0);

	ptr=addrbuf;
	mailparse_rfc822_prname_orlist(rfc, n, &saveaddr, &ptr);
	addrbuf[addrbuflen]=0;

	/* Get rid of surrounding quotes */

	for (p=q=addrbuf; *p; p++)
		if (*p != '"')	*q++=*p;
	*q=0;
	return (addrbuf);
}

char *mailparse_rfc822_gettok(const struct rfc822token *t)
{
	size_t	addrbuflen=0;
	char	*addrbuf, *ptr;

	mailparse_rfc822tok_print(t, &cntlen, &addrbuflen);

	if (!(addrbuf=emalloc(addrbuflen+1)))
		return (0);

	ptr=addrbuf;
	mailparse_rfc822tok_print(t, &saveaddr, &ptr);
	addrbuf[addrbuflen]=0;
	return (addrbuf);
}