/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <ctype.h>
#include <errno.h>
#include <stdlib.h>
#include <strings.h>
#include <sip.h>

#include "sip_msg.h"
#include "sip_miscdefs.h"
#include "sip_parse_generic.h"
#include "sip_parse_uri.h"


/*
 * Accept = "Accept" HCOLON [ accept-range *(COMMA accept-range) ]
 * accept-range = media-range *(SEMI accept-param)
 * media-range = ("* / *" |  (m-type SLASH "*") | (m-type SLASH m-subtype))
 *		*(SEMI m-param)
 * accept-param = ("q" EQUAL qvalue) | generic-param
 * qvalue = ("0" ["." 0*3DIGIT]) | ("1" ["." 0*3DIGIT])
 * generic-param = token [ EQUAL gen-value]
 * gen-value = token | host | quoted-str
 */
int
sip_parse_acpt_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	if (sip_is_empty_hdr(sip_header))
		return (sip_parse_hdr_empty(sip_header, header));
	return (sip_parse_hdr_parser1(sip_header, header, SIP_SLASH));
}

/*
 * Accept-Encoding = "Accept-Encoding" ":" 1#(codings [ ";" "q" "=" qval])
 * codings = (content-coding | "*")
 * content-coding = token
 */
int
sip_parse_acpt_encode_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Accept-Language = "Accept-Language" ":" [ lang * (COMMA lang) ]
 * lang = lang-range *(SEMI accept-param)
 * lang-range = ((1*8ALPHA * ("-" 1*8ALPHA)) | "*"
 */
int
sip_parse_acpt_lang_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	if (sip_is_empty_hdr(sip_header))
		return (sip_parse_hdr_empty(sip_header, header));
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Alert-Info = "Alert-Info" ":" alert-param *(COMMA alert-param)
 * alert-param = LAQUOT absoluteURI RAQUOT * (SEMI generic-param)
 */
int
sip_parse_alert_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STR_VAL, B_TRUE));
}

/*
 * Allow = "Allow" ":" method-name1[, method-name2..]
 */
int
sip_parse_allow_header(_sip_header_t *hdr, sip_parsed_header_t **phdr)
{
	sip_parsed_header_t	*parsed_header;
	sip_hdr_value_t		*value = NULL;
	sip_hdr_value_t		*last_value = NULL;
	int			len;
	int			i;
	int			ret;
	boolean_t		multi_value = B_FALSE;

	if ((ret = sip_prim_parsers(hdr, phdr)) != 0)
		return (ret);

	if (*phdr != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = hdr;

	while (hdr->sip_hdr_current < hdr->sip_hdr_end) {
		value = calloc(1, sizeof (sip_hdr_value_t));
		if (value == NULL) {
			sip_free_phdr(parsed_header);
			return (ENOMEM);
		}
		if (last_value != NULL)
			last_value->sip_next_value = value;
		else
			parsed_header->value = (sip_value_t *)value;

		value->sip_value_start = hdr->sip_hdr_current;
		value->sip_value_header = parsed_header;

		if (sip_find_separator(hdr, SIP_COMMA, 0, 0, B_FALSE) == 0) {
			multi_value = B_TRUE;
		}

		len = hdr->sip_hdr_current - value->sip_value_start;
		for (i = 1; i < MAX_SIP_METHODS; i++) {
			if (strncmp(sip_methods[i].name, value->sip_value_start,
			    len) == 0) {
				break;
			}
		}
		if (i >= MAX_SIP_METHODS) {
			value->int_val = 0;
			value->sip_value_state = SIP_VALUE_BAD;
			if (multi_value)
				goto next_val;
			else
				goto end;
		}
		value->int_val = i;
		if (!multi_value)
			goto end;
	next_val:
		if (sip_find_token(hdr, SIP_COMMA) != 0)
			break;
		value->sip_value_end = hdr->sip_hdr_current - 1;
		last_value = value;
		(void) sip_skip_white_space(hdr);
	}

end:
	*phdr = parsed_header;
	return (0);
}


/*
 * Call-Info = "Call-Info" HCOLON info * (COMMA info)
 * info = LAQUOT absoluteURI RAQUOT * (SEMI info-param)
 * info-param = ("purpose" EQUAL ("icon" | "info" | "card" | token)) |
 *		 generic-param
 */
int
sip_parse_callinfo_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STR_VAL, B_TRUE));
}

/*
 * Content-Disposition = "Content-Disposition" HCOLON disp-type *
 *			(SEMI disp-param)
 * disp-type = "render" | "session" | "icon" | "alert" | disp-ext-token
 * disp-param = handling-param | generic-param
 * handling-param = "handling" EQUAL("optional" | "required" | other-handling)
 * other-handling = token
 * disp-ext-token = token
 *
 */
int
sip_parse_contentdis_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Content-Encoding = ("Content-Encoding" | "e") HCOLON content-coding *
 *			(COMMA content-coding)
 */
int
sip_parse_contentencode_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Content-Language = ("Content-Language" | "l") HCOLON lang-tag *
 *		 (COMMA lang-tag)
 * lang-tag = primary-tag *("-" subtag)
 * prmary-tag = 1*8ALPHA
 * subtag = 1*8ALPHA
 */
int
sip_parse_contentlang_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Date = "Date" HCOLON SIPdate
 * SIPdate = wkday "," SP date1 SP time SP "GMT"
 * date1 = 2DIGIT SP mnth SP 4DIGIT; day month year
 * time = 2DIGIT ":" 2DIGIT ":" 2DIGIT
 * wkday = "Mon" | "Tue" | "Wed" | "Thu" | "Fri" | "Sat" | "Sun"
 * month = "Jan" | "Feb" etc
 */
int
sip_parse_date_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	int			 r;
	sip_hdr_value_t		*value = NULL;

	if ((r = sip_prim_parsers(sip_header, header)) != 0)
		return (r);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	value = calloc(1, sizeof (sip_hdr_value_t));
	if (value == NULL) {
		sip_free_phdr(parsed_header);
		return (ENOMEM);
	}
	parsed_header->value = (sip_value_t *)value;

	value->sip_value_start = sip_header->sip_hdr_current;
	value->sip_value_header = parsed_header;
	value->date_wd_ptr = sip_header->sip_hdr_current;
	if (sip_find_token(sip_header, SIP_COMMA) == 0) {
		value->date_wd_len = sip_header->sip_hdr_current -
		    value->date_wd_ptr - 1;
		sip_header->sip_hdr_current++;
		if (sip_skip_white_space(sip_header) != 0) {
			value->sip_value_state = SIP_VALUE_BAD;
			return (EPROTO);
		}
	} else {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}

	if (sip_skip_white_space(sip_header) != 0) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	r = sip_atoi(sip_header, &value->date_d);
	if (r != 0 || value->date_d < 0 || value->date_d > 31) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	if (sip_skip_white_space(sip_header) != 0) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	value->date_m_ptr = sip_header->sip_hdr_current;
	if (sip_find_token(sip_header, SIP_SP) == 0) {
		value->date_m_len = sip_header->sip_hdr_current -
		    value->date_m_ptr - 1;
	} else {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}

	r = sip_atoi(sip_header, &value->date_y);
	if (r != 0 || value->date_y < 0) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	if (sip_skip_white_space(sip_header) != 0) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	value->date_t_ptr = sip_header->sip_hdr_current;
	if (sip_find_token(sip_header, SIP_SP) == 0) {
		value->date_t_len = sip_header->sip_hdr_current -
		    value->date_t_ptr - 1;
	} else {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}

	value->date_tz_ptr =  sip_header->sip_hdr_current;
	/*
	 * minus 2 to get rid of the CRLF
	 */
	value->date_tz_len = sip_header->sip_hdr_end -
	    sip_header->sip_hdr_current - 2;

	*header = parsed_header;

	sip_header->sip_hdr_parsed = *header;
	return (0);
}

/*
 * Error-Info = "Error-Info" HCOLON error-uri *(COMMA error-uri)
 * error-uri = LAQUOT absoluteURI RAQUOT *(SEMI generic-param)
 */
int
sip_parse_errorinfo_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STR_VAL, B_TRUE));
}

/*
 * Expires = "Expires" HCOLON delta-seconds
 */
int
sip_parse_expire_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser2(sip_header, header, SIP_INT_VAL));
}

/*
 * In-Reply-To = "In-Reply-To" HCOLON callid *(COMMA callid)
 */
int
sip_parse_inreplyto_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * RSeq = "RSeq" HCOLON response-num
 */
int
sip_parse_rseq(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	int		r;
	sip_hdr_value_t	*rseq_value;

	r = sip_parse_hdr_parser2(sip_header, header, SIP_INT_VAL);
	/*
	 * Additionally, a value of 0 is bad_value
	 */
	if (sip_header->sip_hdr_parsed != NULL &&
	    sip_header->sip_hdr_parsed->value != NULL) {
		rseq_value = (sip_hdr_value_t *)
		    sip_header->sip_hdr_parsed->value;
		if (rseq_value->int_val == 0)
			rseq_value->sip_value_state = SIP_VALUE_BAD;
	}
	return (r);
}

/*
 * Min-Expires  =  "Min-Expires" HCOLON delta-seconds
 */
int
sip_parse_minexpire_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser2(sip_header, header, SIP_INT_VAL));
}

/*
 * MIME-Version = "MIME-Version" HCOLON 1*DIGIT "." 1*DIGIT
 */
int
sip_parse_mimeversion_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Organization = "Organization" HCOLON [TEXT-UTF8-TRIM]
 */
int
sip_parse_org_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	if (sip_is_empty_hdr(sip_header))
		return (sip_parse_hdr_empty(sip_header, header));
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Priority = "Priority" HCOLON priority-val
 * priority-val = "emergency" | "urgent" | "normal" | "non-urgent" | other
 * other = token
 */
int
sip_parse_priority_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Reply-To = "Reply-To" HCOLON rplyto-spec
 * rplyto-spec = (name-addr | addr-spec) *(SEMI rplyto-param)
 * rplyto-param = generic-param
 * name-addr = [ display-name ] LAQUOT addr-spec RAQUOT
 * addr-spec = SIP-URI | SIPS-URI | absolute URI
 */
int
sip_parse_replyto_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STRS_VAL,
	    B_TRUE));
}

/*
 * PRIVACY = "Privacy" HCOLON priv-value *(COMMA priv-value)
 * priv-value   =   "header" / "session" / "user" / "none" / "critical"
 *                  / token / id
 */
int
sip_parse_privacy_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}


/*
 * Require = "Require" HCOLON option-tag * (COMMA option-tag)
 */
int
sip_parse_require_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Retry-After = "Retry-After" HCOLON delta-seconds [ comment ] *
 *		(SEMI retry-param)
 * retry-param = "duration" EQUAL delta-seconds
 */
int
sip_parse_retryaft_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	sip_hdr_value_t		*value = NULL;
	int			ret;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	value = calloc(1, sizeof (sip_hdr_value_t));
	if (value == NULL) {
		sip_free_phdr(parsed_header);
		return (ENOMEM);
	}

	parsed_header->value = (sip_value_t *)value;
	value->sip_value_start = sip_header->sip_hdr_current;
	value->sip_value_header = parsed_header;

	ret = sip_atoi(sip_header, &(value->intstr_int));
	if (ret != 0)
		value->sip_value_state = SIP_VALUE_BAD;
	if (sip_find_token(sip_header, SIP_LPAR) == 0) {
		value->intstr_str_ptr = sip_header->sip_hdr_current;
		if (sip_find_token(sip_header, SIP_RPAR) == 0) {
			value->intstr_str_len =
			    sip_header->sip_hdr_current -
			    value->intstr_str_ptr - 1;
			if (sip_find_token(sip_header, SIP_SEMI) == 0) {
				sip_header->sip_hdr_current--;
				(void) sip_parse_params(sip_header,
				    &(value->sip_param_list));
			}
		} else {
			value->sip_value_state = SIP_VALUE_BAD;
			return (EPROTO);
		}
	} else {
		value->intstr_str_ptr = NULL;
		value->intstr_str_len = 0;

		/*
		 * from value start, search if parameter list
		 */
		sip_header->sip_hdr_current = value->sip_value_start;
		if (sip_find_token(sip_header, SIP_SEMI) == 0) {
			sip_header->sip_hdr_current--;
			(void) sip_parse_params(sip_header,
			    &(value->sip_param_list));
		}
	}

	*header = parsed_header;
	sip_header->sip_hdr_parsed = *header;
	return (0);
}

/*
 * Server = "Server" HCOLON servel-val *(LWS server-val)
 * servel-val = product|comment
 * product = token [SLASH version]
 * version = token
 * Treated as one single string
 */
int
sip_parse_server_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Subject = ("Subject" | "s")HCOLON [TEXT-UTF8-TRIM]
 */
int
sip_parse_subject_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	if (sip_is_empty_hdr(sip_header))
		return (sip_parse_hdr_empty(sip_header, header));
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Supported = ("Supported" | "k") HCOLON [option-tag * (COMMA option-tag) ]
 */
int
sip_parse_support_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	if (sip_is_empty_hdr(sip_header))
		return (sip_parse_hdr_empty(sip_header, header));
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Timestamp = "Timestamp" HCOLON 1*DIGIT ["." *(DIGIT)] [LWS delay]
 */
int
sip_parse_timestamp_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	sip_hdr_value_t		*value = NULL;
	int			ret;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	value = calloc(1, sizeof (sip_hdr_value_t));
	if (value == NULL) {
		sip_free_phdr(parsed_header);
		return (ENOMEM);
	}
	parsed_header->value = (sip_value_t *)value;

	value->sip_value_start = sip_header->sip_hdr_current;
	value->sip_value_header = parsed_header;

	if (sip_skip_white_space(sip_header) != 0) {
		value->sip_value_state = SIP_VALUE_BAD;
		return (EPROTO);
	}
	value->strs1_val_ptr = sip_header->sip_hdr_current;

	if (sip_find_white_space(sip_header) == 0) {
		/*
		 * timestamp and delay, timestamp in str1, delay in str2
		 */
		value->strs1_val_len = sip_header->sip_hdr_current -
		    value->strs1_val_ptr;
		(void) sip_skip_white_space(sip_header);

		value->strs2_val_ptr = sip_header->sip_hdr_current;
		if (sip_find_cr(sip_header) != 0) {
			value->sip_value_state = SIP_VALUE_BAD;
			return (EPROTO);
		}
		if (sip_header->sip_hdr_current < value->strs2_val_ptr) {
			value->strs2_val_ptr = NULL;
			value->strs2_val_len = 0;
		} else {
			value->strs2_val_len = sip_header->sip_hdr_current -
			    value->strs2_val_ptr;
		}
	} else {
		/*
		 * no delay information
		 */
		value->strs1_val_len = sip_header->sip_hdr_current
		    - value->strs1_val_ptr;
		value->strs2_val_ptr = NULL;
		value->strs2_val_len = 0;
	}

	*header = parsed_header;
	sip_header->sip_hdr_parsed = *header;

	return (0);
}
/*
 * Unsupported = "Unsupported" HCOLON option-tag * (COMMA option-tag)
 */
int
sip_parse_usupport_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * User-Agent = "User-Agent" HCOLON server-val * (LWS server-val)
 * servel-val = product |comment
 * product = token [SLASH version]
 * version = token
 */
int
sip_parse_useragt_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * Warning = "Warning" HCOLON warning-value *(COMMA warning-value)
 * warning-value = warn-code SP warn-agent SP warn-text
 * warn-code = 3DIGIT
 * warn-agent = hostport | pseudonym ;
 *		 the name or pseudonym of the server adding;
 *		 the Warning header, for use in debugging
 * warn-text = quoted-string
 * pseudonym = token
 */
int
sip_parse_warn_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	int			ret;
	sip_hdr_value_t		*value = NULL;
	sip_hdr_value_t		*last_value = NULL;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	while (sip_header->sip_hdr_current < sip_header->sip_hdr_end) {
		value = calloc(1, sizeof (sip_hdr_value_t));
		if (value == NULL) {
			sip_free_phdr(parsed_header);
			return (ENOMEM);
		}

		if (last_value != NULL)
			last_value->sip_next_value = value;
		else
			parsed_header->value = (sip_value_t *)value;

		value->sip_value_start = sip_header->sip_hdr_current;
		value->sip_value_header = parsed_header;

		ret = sip_atoi(sip_header, &value->warn_code);
		if (ret != 0 || value->warn_code < 100 ||
		    value->warn_code > 999) {
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_val;
		}
		if (sip_skip_white_space(sip_header) != 0) {
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_val;
		}
		value->warn_agt_ptr = sip_header->sip_hdr_current;

		if (sip_find_token(sip_header, SIP_QUOTE) == 0) {
			/*
			 * get warning agent
			 */
			sip_header->sip_hdr_current--;
			(void) sip_reverse_skip_white_space(sip_header);
			value->warn_agt_len = sip_header->sip_hdr_current -
			    value->warn_agt_ptr - 1;
			if (value->warn_agt_len <= 0) {
				value->warn_agt_ptr = NULL;
				value->sip_value_state = SIP_VALUE_BAD;
			}

			/*
			 * We will have a  SIP_QUOTE here
			 */
			(void) sip_find_token(sip_header, SIP_QUOTE);

			value->warn_text_ptr =  sip_header->sip_hdr_current;
			if (sip_find_token(sip_header, SIP_QUOTE) == 0) {
				value->warn_text_len =
				    sip_header->sip_hdr_current -
				    value->warn_text_ptr - 1;
			} else {
				value->sip_value_state = SIP_VALUE_BAD;
				goto get_next_val;
			}
		} else
			/*
			 * warning text must present
			 */
			value->sip_value_state = SIP_VALUE_BAD;

get_next_val:
		if (sip_find_token(sip_header, SIP_COMMA) != 0)
			break;
		value->sip_value_end = sip_header->sip_hdr_current - 1;
		last_value = value;
		(void) sip_skip_white_space(sip_header);
	}

	*header = parsed_header;

	sip_header->sip_hdr_parsed = *header;
	return (0);
}

/*
 * Parse RAck header
 * "RAck" HCOLON response-num LWS CSeq-num LWS Method
 * response-num  =  1*DIGIT
 * CSeq-num      =  1*DIGIT
 */
int
sip_parse_rack(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	sip_hdr_value_t		*rack_value;
	int			len;
	char			*tmp_ptr;
	int			i;
	int			ret;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	parsed_header->value =  calloc(1, sizeof (sip_hdr_value_t));
	if (parsed_header->value == NULL) {
		free(parsed_header);
		return (ENOMEM);
	}
	rack_value = (sip_hdr_value_t *)parsed_header->value;
	rack_value->sip_value_version = SIP_VALUE_VERSION_1;
	rack_value->sip_value_start = sip_header->sip_hdr_current;
	rack_value->sip_value_header = parsed_header;
	if (sip_atoi(sip_header, &rack_value->rack_resp) ||
	    rack_value->rack_resp == 0) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}
	rack_value->sip_value_header = parsed_header;
	/*
	 * Get cseq.
	 */
	if (sip_skip_white_space(sip_header) != 0) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}
	if (sip_atoi(sip_header, &rack_value->rack_cseq)) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}
	/*
	 * Get method.
	 */
	if (sip_skip_white_space(sip_header) != 0) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}

	tmp_ptr = sip_header->sip_hdr_current;
	if (sip_find_white_space(sip_header)) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}

	len = sip_header->sip_hdr_current - tmp_ptr;

	for (i = 1; i < MAX_SIP_METHODS; i++) {
		if (strncmp(sip_methods[i].name, tmp_ptr, len) == 0)
			break;
	}

	if (i >= MAX_SIP_METHODS) {
		rack_value->sip_value_state = SIP_VALUE_BAD;
		rack_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto rack_parse_done;
	}

	rack_value->rack_method = i;
	rack_value->sip_value_end = sip_header->sip_hdr_current;

rack_parse_done:
	sip_header->sip_hdr_parsed = parsed_header;

	*header = parsed_header;
	return (0);
}

/*
 * Allow  =  "Allow" HCOLON [Method *(COMMA Method)]
 */
int
sip_parse_allow_events_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Event             =  ( "Event" / "o" ) HCOLON event-type
 *			*( SEMI event-param )
 * event-type        =  event-package *( "." event-template )
 * event-package     =  token-nodot
 * event-template    =  token-nodot
 * token-nodot       =  1*( alphanum / "-"  / "!" / "%" / "*"
 *			/ "_" / "+" / "`" / "'" / "~" )
 * event-param       =  generic-param / ( "id" EQUAL token )
 */
int
sip_parse_event_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Subscription-State   = "Subscription-State" HCOLON substate-value
 *			*( SEMI subexp-params )
 * substate-value       = "active" / "pending" / "terminated"
 *			/ extension-substate
 * extension-substate   = token
 * subexp-params        =   ("reason" EQUAL event-reason-value)
 *			/ ("expires" EQUAL delta-seconds)*
 *			/ ("retry-after" EQUAL delta-seconds)
 *			/ generic-param
 * event-reason-value   =   "deactivated"
 *				/ "probation"
 *				/ "rejected"
 *				/ "timeout"
 *				/ "giveup"
 *				/ "noresource"
 *				/ event-reason-extension
 * event-reason-extension = token
 */
int
sip_parse_substate_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Authorization     =  "Authorization" HCOLON credentials
 * credentials       =  ("Digest" LWS digest-response)
 *			/ other-response
 * digest-response   =  dig-resp *(COMMA dig-resp)
 * dig-resp          =  username / realm / nonce / digest-uri
 *			/ dresponse / algorithm / cnonce
 *			/ opaque / message-qop
 *			/ nonce-count / auth-param
 * username          =  "username" EQUAL username-value
 * username-value    =  quoted-string
 * digest-uri        =  "uri" EQUAL LDQUOT digest-uri-value RDQUOT
 * digest-uri-value  =  rquest-uri ; Equal to request-uri as specified
 *			by HTTP/1.1
 * message-qop       =  "qop" EQUAL qop-value
 * cnonce            =  "cnonce" EQUAL cnonce-value
 * cnonce-value      =  nonce-value
 * nonce-count       =  "nc" EQUAL nc-value
 * nc-value          =  8LHEX
 * dresponse         =  "response" EQUAL request-digest
 * request-digest    =  LDQUOT 32LHEX RDQUOT
 * auth-param        =  auth-param-name EQUAL
 *			( token / quoted-string )
 * auth-param-name   =  token
 * other-response    =  auth-scheme LWS auth-param
 *			*(COMMA auth-param)
 * auth-scheme       =  token
 */
int
sip_parse_author_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser5(sip_header, header, B_TRUE));
}

/*
 * Authentication-Info  =  "Authentication-Info" HCOLON ainfo
 *				*(COMMA ainfo)
 * ainfo                =  nextnonce / message-qop
 *				/ response-auth / cnonce
 *				/ nonce-count
 * nextnonce            =  "nextnonce" EQUAL nonce-value
 * response-auth        =  "rspauth" EQUAL response-digest
 * response-digest      =  LDQUOT *LHEX RDQUOT
 *
 */
int
sip_parse_ainfo_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * Proxy-Authenticate  =  "Proxy-Authenticate" HCOLON challenge
 * challenge           =  ("Digest" LWS digest-cln *(COMMA digest-cln))
 *				/ other-challenge
 * other-challenge     =  auth-scheme LWS auth-param
 *				*(COMMA auth-param)
 * digest-cln          =  realm / domain / nonce
 *				/ opaque / stale / algorithm
 *				/ qop-options / auth-param
 * realm               =  "realm" EQUAL realm-value
 * realm-value         =  quoted-string
 * domain              =  "domain" EQUAL LDQUOT URI
 *				*( 1*SP URI ) RDQUOT
 * URI                 =  absoluteURI / abs-path
 * nonce               =  "nonce" EQUAL nonce-value
 * nonce-value         =  quoted-string
 * opaque              =  "opaque" EQUAL quoted-string
 * stale               =  "stale" EQUAL ( "true" / "false" )
 * algorithm           =  "algorithm" EQUAL ( "MD5" / "MD5-sess"
 *			/ token )
 * qop-options         =  "qop" EQUAL LDQUOT qop-value
 *			*("," qop-value) RDQUOT
 * qop-value           =  "auth" / "auth-int" / token
 *
 */
int
sip_parse_pauthen_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser5(sip_header, header, B_TRUE));
}

/*
 * Proxy-Authorization  =  "Proxy-Authorization" HCOLON credentials
 */
int
sip_parse_pauthor_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser5(sip_header, header, B_TRUE));
}

/*
 * Proxy-Require  =  "Proxy-Require" HCOLON option-tag
 *			*(COMMA option-tag)
 * option-tag     =  token
 */
int
sip_parse_preq_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, 0));
}

/*
 * WWW-Authenticate  =  "WWW-Authenticate" HCOLON challenge
 * extension-header  =  header-name HCOLON header-value
 * header-name       =  token
 * header-value      =  *(TEXT-UTF8char / UTF8-CONT / LWS)
 * message-body  =  *OCTET
 *
 */
int
sip_parse_wauthen_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser5(sip_header, header, B_TRUE));
}

/*
 * Call-ID  =  ( "Call-ID" / "i" ) HCOLON callid
 */
int
sip_parse_cid_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser4(sip_header, header));
}

/*
 * CSeq  =  "CSeq" HCOLON 1*DIGIT LWS Method
 */
int
sip_parse_cseq_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	sip_hdr_value_t		*cseq_value;
	int			len;
	char			*tmp_ptr;
	int			i;
	int			ret;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	parsed_header->value =  calloc(1, sizeof (sip_hdr_value_t));
	if (parsed_header->value == NULL) {
		free(parsed_header);
		return (ENOMEM);
	}
	cseq_value = (sip_hdr_value_t *)parsed_header->value;
	cseq_value->sip_value_version = SIP_VALUE_VERSION_1;
	cseq_value->sip_value_start = sip_header->sip_hdr_current;
	if (sip_atoi(sip_header, &cseq_value->cseq_num)) {
		cseq_value->sip_value_state = SIP_VALUE_BAD;
		cseq_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto cseq_parse_done;
	}
	cseq_value->sip_value_header = parsed_header;
	/*
	 * Get method.
	 */
	if (sip_skip_white_space(sip_header) != 0) {
		cseq_value->sip_value_state = SIP_VALUE_BAD;
		cseq_value->sip_value_end = sip_header->sip_hdr_end - 2;
		goto cseq_parse_done;
	}

	tmp_ptr = sip_header->sip_hdr_current;

	if (sip_find_white_space(sip_header)) {
		cseq_value->sip_value_state = SIP_VALUE_BAD;
		cseq_value->sip_value_end = sip_header->sip_hdr_current;
		goto cseq_parse_done;
	}

	len = sip_header->sip_hdr_current - tmp_ptr;

	for (i = 1; i < MAX_SIP_METHODS; i++) {
		if (strncmp(sip_methods[i].name, tmp_ptr, len) == 0)
			break;
	}

	if (i >= MAX_SIP_METHODS) {
		cseq_value->sip_value_state = SIP_VALUE_BAD;
		cseq_value->sip_value_end = sip_header->sip_hdr_current;
		goto cseq_parse_done;
	}

	cseq_value->cseq_method = i;
	cseq_value->sip_value_end = sip_header->sip_hdr_current;
cseq_parse_done:

	sip_header->sip_hdr_parsed = parsed_header;

	*header = parsed_header;
	return (0);
}


/*
 * Via =  ( "Via" / "v" ) HCOLON via-parm *(COMMA via-parm)
 * via-parm          =  sent-protocol LWS sent-by *( SEMI via-params )
 * via-params        =  via-ttl / via-maddr
 *                      / via-received / via-branch
 *                      / via-extension
 * via-ttl           =  "ttl" EQUAL ttl
 * via-maddr         =  "maddr" EQUAL host
 * via-received      =  "received" EQUAL (IPv4address / IPv6address)
 * via-branch        =  "branch" EQUAL token
 * via-extension     =  generic-param
 * sent-protocol     =  protocol-name SLASH protocol-version
 *                      SLASH transport
 * protocol-name     =  "SIP" / token
 * protocol-version  =  token
 * transport         =  "UDP" / "TCP" / "TLS" / "SCTP"
 *                      / other-transport
 * sent-by           =  host [ COLON port ]
 * ttl               =  1*3DIGIT ; 0 to 255
 *
 * There can be multiple via headers we always append the header.
 */
int
sip_parse_via_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	int			ret;
	sip_hdr_value_t		*value = NULL;
	sip_hdr_value_t		*last_value = NULL;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;

	while (sip_header->sip_hdr_current < sip_header->sip_hdr_end) {

		value = calloc(1, sizeof (sip_hdr_value_t));
		if (value == NULL) {
			sip_free_phdr(parsed_header);
			return (ENOMEM);
		}
		if (last_value != NULL)
			last_value->sip_next_value = value;
		else
			parsed_header->value = (sip_value_t *)value;

		value->sip_value_version = SIP_VALUE_VERSION_1;
		value->sip_value_start = sip_header->sip_hdr_current;
		value->sip_value_header = parsed_header;
		value->via_protocol_name.sip_str_ptr =
		    sip_header->sip_hdr_current;

		/*
		 * Check to see if there is a version number
		 */
		if (sip_get_protocol_version(sip_header,
		    &value->via_protocol) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		if (sip_find_token(sip_header, SIP_SLASH) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		if (sip_skip_white_space(sip_header) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		value->via_protocol_transport.sip_str_ptr =
		    sip_header->sip_hdr_current;
		if (sip_find_white_space(sip_header) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		value->via_protocol_transport.sip_str_len =
		    sip_header->sip_hdr_current -
		    value->via_protocol_transport.sip_str_ptr;

		if (sip_skip_white_space(sip_header) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		value->via_sent_by_host.sip_str_ptr =
		    sip_header->sip_hdr_current;
		if (*sip_header->sip_hdr_current == '[') {
			if (sip_find_token(sip_header, ']')) {
				if (sip_goto_next_value(sip_header) != 0) {
					sip_free_phdr(parsed_header);
					return (EPROTO);
				}
				value->sip_value_state = SIP_VALUE_BAD;
				goto get_next_via_value;
			}
		} else if (sip_find_separator(sip_header, SIP_SEMI, SIP_COMMA,
		    SIP_HCOLON, B_FALSE)) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}
		value->via_sent_by_host.sip_str_len =
		    sip_header->sip_hdr_current -
		    value->via_sent_by_host.sip_str_ptr;

		if (sip_skip_white_space(sip_header) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		if (*sip_header->sip_hdr_current == SIP_HCOLON) {
			sip_header->sip_hdr_current++;
			/*
			 * We have a port number
			 */
			if (sip_atoi(sip_header, &value->via_sent_by_port) !=
			    0) {
				if (sip_goto_next_value(sip_header) != 0) {
					sip_free_phdr(parsed_header);
					return (EPROTO);
				}
				value->sip_value_state = SIP_VALUE_BAD;
				goto get_next_via_value;
			}

		}

		/*
		 * Do some sanity checking.
		 * This should be replaced by a v4/v6 address check.
		 */
		if (value->via_sent_by_host.sip_str_len == 0 ||
		    (!isalnum(*value->via_sent_by_host.sip_str_ptr) &&
		    *value->via_sent_by_host.sip_str_ptr != '[')) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_phdr(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_via_value;
		}

		ret = sip_parse_params(sip_header, &value->sip_param_list);
		if (ret == EPROTO) {
			value->sip_value_state = SIP_VALUE_BAD;
		} else if (ret != 0) {
			sip_free_phdr(parsed_header);
			return (ret);
		}
get_next_via_value:
		value->sip_value_end = sip_header->sip_hdr_current;

		if (sip_find_token(sip_header, SIP_COMMA) != 0)
			break;
		last_value = value;
		(void) sip_skip_white_space(sip_header);
	}

	sip_header->sip_hdr_parsed = parsed_header;

	*header = parsed_header;
	return (0);
}

/*
 * Max-Forwards  =  "Max-Forwards" HCOLON 1*DIGIT
 */
int
sip_parse_maxf_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser2(sip_header, header, SIP_INT_VAL));
}

/*
 * Content-Type     =  ( "Content-Type" / "c" ) HCOLON media-type
 * media-type       =  m-type SLASH m-subtype *(SEMI m-parameter)
 * m-type           =  discrete-type / composite-type
 * discrete-type    =  "text" / "image" / "audio" / "video"
 *                     / "application" / extension-token
 * composite-type   =  "message" / "multipart" / extension-token
 * extension-token  =  ietf-token / x-token
 * ietf-token       =  token
 * x-token          =  "x-" token
 * m-subtype        =  extension-token / iana-token
 * iana-token       =  token
 * m-parameter      =  m-attribute EQUAL m-value
 * m-attribute      =  token
 * m-value          =  token / quoted-string
 */
int
sip_parse_ctype_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser1(sip_header, header, SIP_SLASH));
}

/*
 * Content-Length  =  ( "Content-Length" / "l" ) HCOLON 1*DIGIT
 */
int
sip_parse_clen_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser2(sip_header, header, SIP_INT_VAL));
}

/*
 * Generic parser for Contact, From, To, Route and Record-Route headers
 *
 * Contact = ("Contact" / "m" ) HCOLON
 *		( STAR / (contact-param *(COMMA contact-param)))
 * contact-param  =  (name-addr / addr-spec) *(SEMI contact-params)
 * name-addr      =  [ display-name ] LAQUOT addr-spec RAQUOT
 * addr-spec      =  SIP-URI / SIPS-URI / absoluteURI
 * display-name   =  *(token LWS)/ quoted-string
 * contact-params     =  c-p-q / c-p-expires
 *                     / contact-extension
 *
 * From =  ( "From" / "f" ) HCOLON from-spec
 * from-spec = ( name-addr / addr-spec )
 *	*( SEMI from-param )
 * from-param  =  tag-param / generic-param
 * tag-param   =  "tag" EQUAL token
 *
 * To =  ( "To" / "t" ) HCOLON ( name-addr
 *	/ addr-spec ) *( SEMI to-param )
 * to-param  =  tag-param / generic-param
 *
 * Route        =  "Route" HCOLON route-param *(COMMA route-param)
 * route-param  =  name-addr *( SEMI rr-param )
 *
 * Record-Route  =  "Record-Route" HCOLON rec-route *(COMMA rec-route)
 * rec-route     =  name-addr *( SEMI rr-param )
 * rr-param      =  generic-param
 *
 * We could have multiple values for these headers. For the ones that have
 * a display name we will have a LAQUOT/RAQUOT. If we encounter an error
 * when parsing a value, we mark the value as bad and start paring the
 * next value, if present. Before we start parsing the next value, we
 * check for any parameters, if present.
 */
int
sip_parse_cftr_header(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	sip_parsed_header_t	*parsed_header;
	char			*tmp_ptr;
	char			*tmp_ptr_2;
	int			ret;
	sip_hdr_value_t		*value = NULL;
	sip_hdr_value_t		*last_value = NULL;

	if ((ret = sip_prim_parsers(sip_header, header)) != 0)
		return (ret);

	if (*header != NULL)
		return (0);

	parsed_header = calloc(1, sizeof (sip_parsed_header_t));
	if (parsed_header == NULL)
		return (ENOMEM);
	parsed_header->sip_parsed_header_version = SIP_PARSED_HEADER_VERSION_1;
	parsed_header->sip_header = sip_header;
	while (sip_header->sip_hdr_current < sip_header->sip_hdr_end) {
		boolean_t	quoted_name = B_FALSE;

		value =  calloc(1, sizeof (sip_hdr_value_t));
		if (value == NULL) {
			sip_free_cftr_header(parsed_header);
			return (ENOMEM);
		}
		if (last_value != NULL)
			last_value->sip_next_value = value;
		else
			parsed_header->value = (sip_value_t *)value;
		if (*sip_header->sip_hdr_current == SIP_QUOTE) {
			sip_header->sip_hdr_current++;
			quoted_name = B_TRUE;
		}
		value->sip_value_version = SIP_VALUE_VERSION_1;
		value->sip_value_start = sip_header->sip_hdr_current;
		value->sip_value_header = parsed_header;
		/*
		 * let's see if there is a display name
		 */
		if (*sip_header->sip_hdr_current != SIP_LAQUOT) {

			tmp_ptr = sip_header->sip_hdr_current;
			/*
			 * According to 20.10 '<' may not have a leading
			 * space.
			 */
			if (quoted_name &&
			    sip_find_token(sip_header, SIP_QUOTE) != 0) {
				if (sip_goto_next_value(sip_header) != 0) {
					sip_free_cftr_header(parsed_header);
					return (EPROTO);
				}
				value->sip_value_state = SIP_VALUE_BAD;
				goto get_next_cftr_value;
			} else if (sip_find_separator(sip_header, SIP_SEMI,
			    SIP_LAQUOT, SIP_COMMA, B_TRUE) != 0) {
				/*
				 * only a uri.
				 */
				value->cftr_uri.sip_str_ptr = tmp_ptr;
				value->cftr_uri.sip_str_len =
				    sip_header->sip_hdr_current - tmp_ptr;
				/*
				 * It's an error not to have a uri.
				 */
				if (value->cftr_uri.sip_str_len == 0) {
					if (sip_goto_next_value(sip_header) !=
					    0) {
						sip_free_cftr_header(
						    parsed_header);
						return (EPROTO);
					}
					value->sip_value_state = SIP_VALUE_BAD;
					goto get_next_cftr_value;
				}
				goto get_next_cftr_value;
			}
			/*
			 * This is needed to get rid of leading white spaces of
			 * display name or uri
			 */
			--sip_header->sip_hdr_current;
			(void) sip_reverse_skip_white_space(sip_header);
			++sip_header->sip_hdr_current;
			tmp_ptr_2 = sip_header->sip_hdr_current;
			if (*sip_header->sip_hdr_current == SIP_SP) {
				if (sip_skip_white_space(sip_header) != 0) {
					/*
					 * only a uri.
					 */
					value->cftr_uri.sip_str_ptr = tmp_ptr;
					value->cftr_uri.sip_str_len =
					    tmp_ptr_2 - tmp_ptr;
					/*
					 * It's an error not to have a uri.
					 */
					if (value->cftr_uri.sip_str_len == 0) {
						if (sip_goto_next_value(
						    sip_header) != 0) {
							sip_free_cftr_header(
							    parsed_header);
							return (EPROTO);
						}
						value->sip_value_state =
						    SIP_VALUE_BAD;
						goto get_next_cftr_value;
					}
					goto get_next_cftr_value;
				}
			}

			if (*sip_header->sip_hdr_current != SIP_LAQUOT) {
				/*
				 * No display name here.
				 */
				value->cftr_uri.sip_str_ptr = tmp_ptr;
				value->cftr_uri.sip_str_len = tmp_ptr_2 -
				    tmp_ptr;
				/*
				 * It's an error not to have a uri.
				 */
				if (value->cftr_uri.sip_str_len == 0) {
					if (sip_goto_next_value(sip_header) !=
					    0) {
						sip_free_cftr_header(
						    parsed_header);
						return (EPROTO);
					}
					value->sip_value_state = SIP_VALUE_BAD;
					goto get_next_cftr_value;
				}
				goto get_params;
			}

			value->cftr_name = malloc(sizeof (sip_str_t));
			if (value->cftr_name == NULL) {
				sip_free_cftr_header(parsed_header);
				return (ENOMEM);
			}
			value->cftr_name->sip_str_ptr = tmp_ptr;
			value->cftr_name->sip_str_len = tmp_ptr_2 - tmp_ptr;
			if (quoted_name)
				value->cftr_name->sip_str_len--;
		}

		if (sip_find_token(sip_header, SIP_LAQUOT) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_cftr_header(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_cftr_value;
		}

		if (*sip_header->sip_hdr_current == SIP_SP) {
			if (sip_skip_white_space(sip_header) != 0) {
				if (sip_goto_next_value(sip_header) != 0) {
					sip_free_cftr_header(parsed_header);
					return (EPROTO);
				}
				value->sip_value_state = SIP_VALUE_BAD;
				goto get_next_cftr_value;
			}
		}

		tmp_ptr = sip_header->sip_hdr_current;

		if (sip_find_separator(sip_header, SIP_RAQUOT, 0, 0, B_FALSE)) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_cftr_header(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_cftr_value;
		}

		value->cftr_uri.sip_str_ptr = tmp_ptr;
		value->cftr_uri.sip_str_len =
		    sip_header->sip_hdr_current - tmp_ptr;

		if (sip_find_token(sip_header, SIP_RAQUOT) != 0) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_cftr_header(parsed_header);
				return (EINVAL);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_cftr_value;
		}

		if (value->cftr_uri.sip_str_len <= strlen("<>")) {
			if (sip_goto_next_value(sip_header) != 0) {
				sip_free_cftr_header(parsed_header);
				return (EPROTO);
			}
			value->sip_value_state = SIP_VALUE_BAD;
			goto get_next_cftr_value;
		}

get_params:
		ret = sip_parse_params(sip_header, &value->sip_param_list);
		if (ret == EPROTO) {
			value->sip_value_state = SIP_VALUE_BAD;
		} else if (ret != 0) {
			sip_free_cftr_header(parsed_header);
			return (ret);
		}
get_next_cftr_value:
		value->sip_value_end = sip_header->sip_hdr_current;

		/*
		 * Parse uri
		 */
		if (value->cftr_uri.sip_str_len > 0) {
			int			error;
			uint_t			uri_errflags;
			char			*uri = "*";
			_sip_msg_t		*sip_msg;
			sip_message_type_t	*msg_type;

			value->sip_value_parsed_uri = sip_parse_uri(
			    &value->cftr_uri, &error);
			if (value->sip_value_parsed_uri == NULL) {
				sip_free_cftr_header(parsed_header);
				return (ENOMEM);
			}
			uri_errflags = ((_sip_uri_t *)value->
			    sip_value_parsed_uri)->sip_uri_errflags;
			if (error != 0 || uri_errflags != 0) {
				if ((strcmp(SIP_CONTACT, sip_header->
				    sip_header_functions->header_name) == 0) &&
				    (strncmp(value->cftr_uri.sip_str_ptr, uri,
				    strlen(uri)) == 0) && (strlen(uri) ==
				    value->cftr_uri.sip_str_len)) {
					sip_msg = sip_header->sip_hdr_sipmsg;
					msg_type = sip_msg->sip_msg_req_res;
					if (msg_type->is_request && msg_type->
					    sip_req_method == REGISTER) {
						error = 0;
						((_sip_uri_t *)value->
						    sip_value_parsed_uri)->
						    sip_uri_errflags = 0;
					} else {
						value->sip_value_state =
						    SIP_VALUE_BAD;
					}
				} else {
					value->sip_value_state = SIP_VALUE_BAD;
				}
			}
		}

		(void) sip_find_token(sip_header, SIP_COMMA);
		last_value = value;
		(void) sip_skip_white_space(sip_header);
	}

	sip_header->sip_hdr_parsed = parsed_header;

	*header = parsed_header;
	return (0);
}

/*
 * PAssertedID = "P-Asserted-Identity" HCOLON PAssertedID-value
 *               *(COMMA PAssertedID-value)
 * PAssertedID-value = name-addr / addr-spec
 */
int
sip_parse_passertedid(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STRS_VAL,
	    B_TRUE));
}

/*
 * PPreferredID = "P-Preferred-Identity" HCOLON PPreferredID-value
 *               *(COMMA PAssertedID-value)
 * PPreferredID-value = name-addr / addr-spec
 */
int
sip_parse_ppreferredid(_sip_header_t *sip_header, sip_parsed_header_t **header)
{
	return (sip_parse_hdr_parser3(sip_header, header, SIP_STRS_VAL,
	    B_TRUE));
}


/*
 * We don't do anything for a header we don't understand
 */
/* ARGSUSED */
int
sip_parse_unknown_header(_sip_header_t *sip_header,
    sip_parsed_header_t **header)
{
	return (EINVAL);
}