/*
* 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.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <ctype.h>
#include <stdlib.h>
#include <string.h>
#include "sip_parse_uri.h"
/*
* SIP-URI = "sip:" [ userinfo ] hostport uri-parameters [ headers ]
* SIPS-URI = "sips:" [ userinfo ] hostport uri-parameters [ headers ]
* userinfo = ( user / telephone-subscriber ) [ ":" password ] "@"
* user = 1*( unreserved / escaped / user-unreserved )
* user-unreserved = "&" / "=" / "+" / "$" / "," / ";" / "?" / "/"
* password = *( unreserved / escaped / "&" / "=" / "+" / "$" / "," )
* hostport = host [ ":" port ]
* host = hostname / IPv4address / IPv6reference
* hostname = *( domainlabel "." ) toplabel [ "." ]
* domainlabel = alphanum / alphanum *( alphanum / "-" ) alphanum
* toplabel = ALPHA / ALPHA *( alphanum / "-" ) alphanum
* IPv4address = 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT
* IPv6reference = "[" IPv6address "]"
* IPv6address = hexpart [ ":" IPv4address ]
* hexpart = hexseq / hexseq "::" [ hexseq ] / "::" [ hexseq ]
* hexseq = hex4 *( ":" hex4)
* hex4 = 1*4HEXDIG
* port = 1*DIGIT
*
* The BNF for telephone-subscriber can be found in RFC 2806 [9]. Note,
* however, that any characters allowed there that are not allowed in
* the user part of the SIP URI MUST be escaped.
*
* uri-parameters = *( ";" uri-parameter)
* uri-parameter = transport-param / user-param / method-param
* / ttl-param / maddr-param / lr-param / other-param
* transport-param = "transport="( "udp" / "tcp" / "sctp" / "tls"
* / other-transport)
* other-transport = token
* user-param = "user=" ( "phone" / "ip" / other-user)
* other-user = token
* method-param = "method=" Method
* ttl-param = "ttl=" ttl
* maddr-param = "maddr=" host
* lr-param = "lr"
* other-param = pname [ "=" pvalue ]
* pname = 1*paramchar
* pvalue = 1*paramchar
* paramchar = param-unreserved / unreserved / escaped
* param-unreserved = "[" / "]" / "/" / ":" / "&" / "+" / "$"
* headers = "?" header *( "&" header )
* header = hname "=" hvalue
* hname = 1*( hnv-unreserved / unreserved / escaped )
* hvalue = *( hnv-unreserved / unreserved / escaped )
* hnv-unreserved = "[" / "]" / "/" / "?" / ":" / "+" / "$"
*
*/
#define SIP_URI_MSG_BUF_SZ 100
#define SIP_URI_ISHEX(c) \
(((int)(c) >= 0x30 && (int)(c) <= 0x39) || \
((int)(c) >= 0x41 && (int)(c) <= 0x46) || \
((int)(c) >= 0x61 && (int)(c) <= 0x66))
#define SIP_URI_ISURLESCAPE(scan, end) \
((scan) + 2 < (end) && (scan)[0] == '%' && \
SIP_URI_ISHEX((scan)[1]) && SIP_URI_ISHEX((scan[2])))
/*
* URL character classes
* mark - _ . ! ~ * ' ()
* reserved ; / ? : @ & = + $ , also [] for IPv6
* unreserved alphanum mark
* pchar : @ & = + $ , unreserved
* userinfo ; : & = + $ , unreserved escaped
* relsegment ; @ & = + $ , unreserved escaped
* reg_name ; : @ & = + $ , unreserved escaped
* token - _ . ! ~ * ' % + `
* param-unreserved [ ] / : + $ &
* hnv-unreserved [ ] / : + $ ?
*/
#define SIP_URI_ALPHA_BIT 0x0001
#define SIP_URI_DIGIT_BIT 0x0002
#define SIP_URI_ALNUM_BITS 0x0003
#define SIP_URI_SCHEME_BIT 0x0004 /* for - + . */
#define SIP_URI_TOKEN_BIT 0x0008 /* for - _ . ! ~ * ' % + ` */
#define SIP_URI_QUEST_BIT 0x0010 /* for ? */
#define SIP_URI_AT_BIT 0x0020 /* for @ */
#define SIP_URI_COLON_BIT 0x0040 /* for : */
#define SIP_URI_SEMI_BIT 0x0080 /* for ; */
#define SIP_URI_DASH_BIT 0x0100 /* for - */
#define SIP_URI_MARK_BIT 0x0200 /* for - _ . ! ~ * ' ( ) */
#define SIP_URI_AND_BIT 0x0400 /* for & */
#define SIP_URI_PHCOMM_BIT 0x0800 /* for [ ] / : + $ */
#define SIP_URI_OTHER_BIT 0x1000 /* for = + $ , */
#define SIP_URI_SLASH_BIT 0x2000 /* for / */
#define SIP_URI_VISUALSEP_BIT 0x4000 /* for -.() */
#define SIP_URI_DTMFURI_DIGIT_BIT 0x8000 /* for *ABCD */
#define a SIP_URI_ALPHA_BIT
#define d SIP_URI_DIGIT_BIT
#define s SIP_URI_SCHEME_BIT
#define t SIP_URI_TOKEN_BIT
#define q SIP_URI_QUEST_BIT
#define m SIP_URI_AT_BIT
#define c SIP_URI_COLON_BIT
#define i SIP_URI_SEMI_BIT
#define h SIP_URI_DASH_BIT
#define k SIP_URI_MARK_BIT
#define n SIP_URI_AND_BIT
#define o SIP_URI_PHCOMM_BIT
#define r SIP_URI_OTHER_BIT
#define l SIP_URI_SLASH_BIT
#define v SIP_URI_VISUALSEP_BIT
#define f SIP_URI_DTMFURI_DIGIT_BIT
static const unsigned short sip_uri_table[256] = {
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, t|k, 0, 0, o|r, t, n, t|k,
k|v, k|v, t|k|f, s|t|r|o, r, h|s|t|k|v, s|t|k|v, o|l,
d, d, d, d, d, d, d, d,
d, d, c|o, i, 0, r, 0, q,
m, a|f, a|f, a|f, a|f, a, a, a,
a, a, a, a, a, a, a, a,
a, a, a, a, a, a, a, a,
a, a, a, o, 0, o, 0, t|k,
t, a, a, a, a, a, a, a,
a, a, a, a, a, a, a, a,
a, a, a, a, a, a, a, a,
a, a, a, 0, 0, 0, t|k, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
};
#undef a
#undef d
#undef s
#undef t
#undef q
#undef m
#undef c
#undef i
#undef h
#undef k
#undef n
#undef o
#undef r
#undef l
#undef v
#undef f
#define SIP_URI_UT(c) sip_uri_table[(unsigned char)(c)]
#define SIP_URI_ISALPHA(c) (SIP_URI_UT(c) & SIP_URI_ALPHA_BIT)
#define SIP_URI_ISDIGIT(c) (SIP_URI_UT(c) & SIP_URI_DIGIT_BIT)
#define SIP_URI_ISALNUM(c) (SIP_URI_UT(c) & SIP_URI_ALNUM_BITS)
#define SIP_URI_ISSCHEME(c) \
(SIP_URI_UT(c) & (SIP_URI_ALNUM_BITS|SIP_URI_SCHEME_BIT))
#define SIP_URI_ISTOKEN(c) \
(SIP_URI_UT(c) & (SIP_URI_ALNUM_BITS|SIP_URI_TOKEN_BIT))
#define SIP_URI_ISSIPDELIM(c) \
(SIP_URI_UT(c) & (SIP_URI_SEMI_BIT|SIP_URI_QUEST_BIT))
#define SIP_URI_ISSIPHDELIM(c) \
(SIP_URI_UT(c) & (SIP_URI_COLON_BIT|SIP_URI_SEMI_BIT|SIP_URI_QUEST_BIT))
#define SIP_URI_ISHOST(c) \
(SIP_URI_UT(c) & (SIP_URI_ALNUM_BITS|SIP_URI_DASH_BIT))
#define SIP_URI_ISUSER(c) \
(SIP_URI_UT(c) & (SIP_URI_OTHER_BIT|SIP_URI_SEMI_BIT| \
SIP_URI_QUEST_BIT|SIP_URI_SLASH_BIT|SIP_URI_AND_BIT))
#define SIP_URI_ISABSHDELIM(c) \
(SIP_URI_UT(c) & \
(SIP_URI_SLASH_BIT|SIP_URI_COLON_BIT|SIP_URI_QUEST_BIT))
#define SIP_URI_ISABSDELIM(c) \
(SIP_URI_UT(c) & (SIP_URI_SLASH_BIT|SIP_URI_QUEST_BIT))
#define SIP_URI_ISUNRESERVED(c) \
(SIP_URI_UT(c) & (SIP_URI_ALNUM_BITS|SIP_URI_MARK_BIT))
#define SIP_URI_ISPARAM(c) \
(SIP_URI_UT(c) & (SIP_URI_PHCOMM_BIT|SIP_URI_AND_BIT|\
SIP_URI_ALNUM_BITS|SIP_URI_MARK_BIT))
#define SIP_URI_ISHEADER(c) \
(SIP_URI_UT(c) & (SIP_URI_PHCOMM_BIT|SIP_URI_QUEST_BIT|\
SIP_URI_ALNUM_BITS|SIP_URI_MARK_BIT))
#define SIP_URI_ISOTHER(c) (SIP_URI_UT(c) & SIP_URI_OTHER_BIT)
#define SIP_URI_ISRESERVED(c) \
(SIP_URI_UT(c) & (SIP_URI_SEMI_BIT|SIP_URI_SLASH_BIT| \
SIP_URI_QUEST_BIT| SIP_URI_COLON_BIT|SIP_URI_AT_BIT| \
SIP_URI_AND_BIT|SIP_URI_OTHER_BIT))
#define SIP_URI_ISPCHAR(c) \
(SIP_URI_UT(c) & (SIP_URI_COLON_BIT|SIP_URI_AT_BIT| \
SIP_URI_AND_BIT|SIP_URI_OTHER_BIT))
#define SIP_URI_ISREGNAME(c) \
(SIP_URI_UT(c) & \
(SIP_URI_OTHER_BIT|SIP_URI_SEMI_BIT|SIP_URI_COLON_BIT| \
SIP_URI_AT_BIT|SIP_URI_AND_BIT))
#define SIP_URI_ISPHONEDIGIT(c) \
(SIP_URI_UT(c) & (SIP_URI_DIGIT_BIT|SIP_URI_VISUALSEP_BIT))
#define SIP_URI_ISDTMFDIGIT(c) (SIP_URI_UT(c) & SIP_URI_DTMFURI_DIGIT_BIT)
static int sip_uri_url_casecmp(const char *, const char *, unsigned);
static void sip_uri_parse_params(_sip_uri_t *, char *, char *);
static void sip_uri_parse_headers(_sip_uri_t *, char *, char *);
static void sip_uri_parse_abs_opaque(_sip_uri_t *, char *, char *);
static void sip_uri_parse_abs_query(_sip_uri_t *, char *, char *);
static void sip_uri_parse_abs_path(_sip_uri_t *, char *, char *);
static void sip_uri_parse_abs_regname(_sip_uri_t *, char *, char *);
static int sip_uri_parse_scheme(_sip_uri_t *, char *, char *);
static void sip_uri_parse_password(_sip_uri_t *, char *, char *);
static void sip_uri_parse_user(_sip_uri_t *, char *, char *);
static void sip_uri_parse_port(_sip_uri_t *, char *, char *);
static void sip_uri_parse_netpath(_sip_uri_t *, char **, char *, boolean_t);
static int sip_uri_parse_ipv6(char *, char *);
static int sip_uri_parse_ipv4(char *, char *);
static int sip_uri_parse_hostname(char *, char *);
static int sip_uri_parse_tel(char *, char *);
static int sip_uri_parse_tel_areaspe(char *, char *);
static int sip_uri_parse_tel_servicepro(char *, char *);
static int sip_uri_parse_tel_futureext(char *, char *);
static int sip_uri_isTokenchar(char **, char *);
static int sip_uri_isEscapedPound(char **, char *);
static int sip_uri_hexVal(char *, char *);
static int SIP_URI_HEXVAL(int);
/*
* get the hex value of a char
*/
static int
SIP_URI_HEXVAL(int c)
{
if (c >= 0x30 && c <= 0x39)
return (c - '0');
if (c >= 0x41 && c <= 0x46)
return (c - 'A' + 10);
if (c >= 0x61 && c <= 0x66)
return (c - 'a' + 10);
return (c);
}
/*
* basic ASCII case-insensitive comparison
*/
static int
sip_uri_url_casecmp(const char *str1, const char *str2, unsigned len)
{
unsigned j;
for (j = 0; j < len && tolower(str1[j]) == tolower(str2[j]) &&
str1[j] != '\0'; ++j) {
;
}
return (j == len ? 0 : tolower(str2[j]) - tolower(str1[j]));
}
/*
* telephone-subscriber = global-phone-number / local-phone-number
* Please refer to RFC 2806
*/
static int
sip_uri_parse_tel(char *scan, char *uend)
{
char *mark = (char *)0;
int ret = 0;
int isGlobal = 0;
int quote = 0;
if (scan == uend)
return (0);
if (*scan == '+') {
++scan;
isGlobal = 1;
}
mark = scan;
if (isGlobal) {
while (scan < uend && SIP_URI_ISPHONEDIGIT(*scan))
++scan;
} else {
while (scan < uend &&
(SIP_URI_ISPHONEDIGIT(*scan) ||
SIP_URI_ISDTMFDIGIT(*scan) ||
sip_uri_isEscapedPound(&scan, uend) ||
*scan == 'p' || *scan == 'w')) {
++scan;
}
}
if (mark == scan || (scan < uend && *scan != ';'))
return (0);
/*
* parse isdn-subaddress
*/
if (uend - scan > 6 && !sip_uri_url_casecmp(scan, ";isub=", 6)) {
scan += 6;
mark = scan;
while (scan < uend && SIP_URI_ISPHONEDIGIT(*scan))
++scan;
if (mark == scan || (scan < uend && *scan != ';'))
return (0);
}
/*
* parse post-dial
*/
if (uend - scan > 7 && !sip_uri_url_casecmp(scan, ";postd=", 7)) {
scan += 7;
mark = scan;
while (scan < uend &&
(SIP_URI_ISPHONEDIGIT(*scan) ||
SIP_URI_ISDTMFDIGIT(*scan) ||
sip_uri_isEscapedPound(&scan, uend) ||
*scan == 'p' || *scan == 'w')) {
++scan;
}
if (mark == scan || (scan < uend && *scan != ';'))
return (0);
}
if (!isGlobal) {
/*
* parse area-specifier
*/
if (uend - scan > 15 &&
!sip_uri_url_casecmp(scan, ";phone-context=", 15)) {
scan += 15;
mark = scan;
while (scan < uend && *scan != ';')
++scan;
ret = sip_uri_parse_tel_areaspe(mark, scan);
}
} else {
ret = 1;
}
/*
* parse area-specifier, service-provider, future-extension
*/
while (scan < uend && ret) {
if (uend - scan > 15 &&
!sip_uri_url_casecmp(scan, ";phone-context=", 15)) {
scan += 15;
mark = scan;
while (scan < uend && *scan != ';')
++scan;
ret = sip_uri_parse_tel_areaspe(mark, scan);
} else if (uend - scan > 5 &&
!sip_uri_url_casecmp(scan, ";tsp=", 5)) {
scan += 5;
mark = scan;
while (scan < uend && *scan != ';')
++scan;
ret = sip_uri_parse_tel_servicepro(mark, scan);
} else {
++scan;
mark = scan;
while (scan < uend && (*scan != ';' || quote)) {
if (sip_uri_hexVal(scan, uend) == 0x22) {
quote = !quote;
scan += 3;
} else {
++scan;
}
}
ret = sip_uri_parse_tel_futureext(mark, scan);
}
}
return (ret && scan == uend);
}
/*
* area-specifier = ";" phone-context-tag "=" phone-context-ident
* phone-context-tag = "phone-context"
* phone-context-ident = network-prefix / private-prefix
* network-prefix = global-network-prefix / local-network-prefix
* global-network-prefix = "+" 1*phonedigit
* local-network-prefix = 1*(phonedigit / dtmf-digit / pause-character)
* private-prefix = (%x21-22 / %x24-27 / %x2C / %x2F / %x3A /
* %x3C-40 / %x45-4F / %x51-56 / %x58-60 /
* %x65-6F / %x71-76 / %x78-7E)
* *(%x21-3A / %x3C-7E)
* phonedigit = DIGIT / visual-separator
* visual-separator = "-" / "." / "(" / ")"
* pause-character = one-second-pause / wait-for-dial-tone
* one-second-pause = "p"
* wait-for-dial-tone = "w"
* dtmf-digit = "*" / "#" / "A" / "B" / "C" / "D"
*/
static int
sip_uri_parse_tel_areaspe(char *scan, char *uend)
{
int uri_hexValue;
if (scan == uend)
return (0);
/*
* parse global-network-prefix
*/
if (*scan == '+') {
++scan;
if (scan == uend)
return (0);
while (scan < uend && SIP_URI_ISPHONEDIGIT(*scan))
++scan;
/*
* parse local-network-prefix
*/
} else if (SIP_URI_ISPHONEDIGIT(*scan) || SIP_URI_ISDTMFDIGIT(*scan) ||
sip_uri_isEscapedPound(&scan, uend) ||
*scan == 'p' || *scan == 'w') {
++scan;
while (scan < uend &&
(SIP_URI_ISPHONEDIGIT(*scan) ||
SIP_URI_ISDTMFDIGIT(*scan) ||
sip_uri_isEscapedPound(&scan, uend) ||
*scan == 'p' || *scan == 'w')) {
++scan;
}
} else {
/*
* parse private-prefix
*
* any characters allowed in RFC 2806 that are not allowed in
* the user part of the SIP URI MUST be escaped
*
* private-prefix = (! $ & ', / = ? _
* EFGHIJKLMNOQRSTUVXYZ efghijklmnoqrstuvxyz
* { } | ~ [ ] \ ^ ` " % : < > @)
* *(%x21-3A / %x3C-7E)
*
* following characters are allowed in RFC 2806 and
* the user part of SIP URI
* ! $ & ', / = ? _ EFGHIJKLMNOQRSTUVXYZ efghijklmnoqrstuvxyz
*/
if (*scan == '!' || *scan == '$' || *scan == '&' ||
*scan == '\'' || *scan == ',' || *scan == '/' ||
*scan == '=' || *scan == '?' || *scan == '_' ||
(*scan >= 'E' && *scan <= 'Z' &&
*scan != 'P' && *scan != 'W') ||
(*scan >= 'e' && *scan <= 'z' &&
*scan != 'p' && *scan != 'w')) {
++scan;
} else {
uri_hexValue = sip_uri_hexVal(scan, uend);
if (uri_hexValue == 0x21 || uri_hexValue == 0x22 ||
(uri_hexValue >= 0x24 && uri_hexValue <= 0x27) ||
uri_hexValue == 0x2c || uri_hexValue == 0x2f ||
uri_hexValue == 0x3a ||
(uri_hexValue >= 0x3c && uri_hexValue <= 0x40) ||
(uri_hexValue >= 0x45 && uri_hexValue <= 0x4f) ||
(uri_hexValue >= 0x51 && uri_hexValue <= 0x56) ||
(uri_hexValue >= 0x58 && uri_hexValue <= 0x60) ||
(uri_hexValue >= 0x65 && uri_hexValue <= 0x6f) ||
(uri_hexValue >= 0x71 && uri_hexValue <= 0x76) ||
(uri_hexValue >= 0x78 && uri_hexValue <= 0x7e)) {
scan += 3;
} else {
return (0);
}
}
/*
* parse *(%x21-3A / %x3C-7E)
*/
while (scan < uend) {
if (SIP_URI_ISUNRESERVED(*scan) ||
(SIP_URI_ISUSER(*scan) && *scan != ';')) {
++scan;
} else {
uri_hexValue = sip_uri_hexVal(scan, uend);
if (uri_hexValue >= 0x21 &&
uri_hexValue <= 0x7e &&
uri_hexValue != 0x3b) {
scan += 3;
} else {
return (0);
}
}
}
}
if (scan < uend)
return (0);
return (1);
}
static int
sip_uri_hexVal(char *scan, char *uend)
{
int ret = -1;
if (SIP_URI_ISURLESCAPE(scan, uend)) {
ret = (SIP_URI_ISDIGIT(scan[1]) ? (scan[1] - '0') :
(tolower(scan[1]) - 'a' + 10)) * 16 +
(SIP_URI_ISDIGIT(scan[2]) ? (scan[2] - '0') :
(tolower(scan[2]) - 'a' + 10));
}
return (ret);
}
/*
* service-provider = ";" provider-tag "=" provider-hostname
* provider-tag = "tsp"
* provider-hostname = domain
*/
static int
sip_uri_parse_tel_servicepro(char *scan, char *uend)
{
char *mark = (char *)0;
if (scan == uend)
return (0);
/*
* parse domain=" "
*/
if (sip_uri_hexVal(scan, uend) == 0x20 && scan + 3 == uend)
return (1);
while (scan < uend) {
mark = scan;
while (scan < uend && (*scan == '-'|| SIP_URI_ISALNUM(*scan)))
++scan;
if ((scan < uend && *scan != '.') ||
!SIP_URI_ISALPHA(*mark) || !SIP_URI_ISALNUM(*(scan - 1))) {
return (0);
}
if (scan < uend)
++scan;
}
if (scan < uend)
return (0);
return (1);
}
/*
* future-extension = ";" 1*(token-char) ["=" ((1*(token-char)
* ["?" 1*(token-char)]) / quoted-string )]
* token-char = (%x21 / %x23-27 / %x2A-2B / %x2D-2E / %x30-39
* / %x41-5A / %x5E-7A / %x7C / %x7E)
*/
static int
sip_uri_parse_tel_futureext(char *scan, char *uend)
{
char *mark;
int uri_hexValue = 0;
if (scan == uend)
return (0);
/*
* parse 1*(token-char)
*/
mark = scan;
while (scan < uend && sip_uri_isTokenchar(&scan, uend))
;
if (mark == scan ||
(scan < uend && (*scan != '=' || scan + 1 == uend))) {
return (0);
}
if (scan == uend)
return (1);
++scan;
/*
* parse 1*token-char ["?" 1*token-char]
*/
if (sip_uri_isTokenchar(&scan, uend)) {
while (sip_uri_isTokenchar(&scan, uend))
;
if (scan < uend) {
if (*scan != '?')
return (0);
++scan;
mark = scan;
while (sip_uri_isTokenchar(&scan, uend))
;
if (mark == scan)
return (0);
}
} else { /* parse quoted-string */
uri_hexValue = sip_uri_hexVal(scan, uend);
if (uri_hexValue != 0x22)
return (0);
scan += 3;
while (scan < uend && sip_uri_hexVal(scan, uend) != 0x22) {
/*
* parse "\" CHAR
*/
if (sip_uri_hexVal(scan, uend) == 0x5c) {
scan += 3;
if (scan < uend) {
if (SIP_URI_ISUNRESERVED(*scan) ||
SIP_URI_ISUSER(*scan)) {
++scan;
} else if (sip_uri_hexVal(scan, uend) >=
0x00 &&
sip_uri_hexVal(scan, uend) <=
0x7f) {
scan += 3;
} else {
return (0);
}
} else {
return (0);
}
} else {
if (SIP_URI_ISUNRESERVED(*scan) ||
SIP_URI_ISUSER(*scan)) {
++scan;
} else {
uri_hexValue =
sip_uri_hexVal(scan, uend);
if ((uri_hexValue >= 0x20 &&
uri_hexValue <= 0x21) ||
(uri_hexValue >= 0x23 &&
uri_hexValue <= 0x7e) ||
(uri_hexValue >= 0x80 &&
uri_hexValue <= 0xff)) {
scan += 3;
} else {
return (0);
}
}
}
}
if (scan == uend ||
(scan < uend && sip_uri_hexVal(scan, uend) != 0x22)) {
return (0);
}
scan += 3;
}
if (scan < uend)
return (0);
return (1);
}
/*
* Any characters allowed in RFC2806 tel URL that are not allowed in
* the user part of the SIP URI MUST be escaped.
* token-char = - _ . ! ~ * ' $ & + DIGIT ALPHA # % ^ ` |
*/
static int
sip_uri_isTokenchar(char **pscan, char *uend)
{
char *scan = *pscan;
int uri_hexValue = 0;
if (scan == uend)
return (0);
/*
* for ALPAH DIGIT - _ . ! ~ * ' $ & +
*/
if ((SIP_URI_ISUNRESERVED(*scan) && *scan != '(' && *scan != ')') ||
*scan == '$' || *scan == '&' || *scan == '+') {
++scan;
*pscan = scan;
return (1);
}
uri_hexValue = sip_uri_hexVal(scan, uend);
if (uri_hexValue == 0x21 || uri_hexValue == 0x7c ||
uri_hexValue == 0x7e ||
(uri_hexValue >= 0x23 && uri_hexValue <= 0x27) ||
(uri_hexValue >= 0x2a && uri_hexValue <= 0x2b) ||
(uri_hexValue >= 0x2d && uri_hexValue <= 0x2e) ||
(uri_hexValue >= 0x30 && uri_hexValue <= 0x39) ||
(uri_hexValue >= 0x41 && uri_hexValue <= 0x5a) ||
(uri_hexValue >= 0x5e && uri_hexValue <= 0x7a)) {
scan += 3;
*pscan = scan;
return (1);
}
return (0);
}
/*
* '#' is not allowed in the telephone-subscriber part of SIP URI
* it must be escaped
*/
static int
sip_uri_isEscapedPound(char **pscan, char *uend)
{
char *scan = *pscan;
if (scan == uend)
return (0);
if (*scan == '%' && scan + 2 < uend && scan[1] == '2' &&
scan[2] == '3') {
scan += 2;
*pscan = scan;
return (1);
}
return (0);
}
/*
* scheme = ALPHA *( ALPHA / DIGIT / "+" / "-" / "." )
*/
static int
sip_uri_parse_scheme(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_SCHEME;
return (0);
}
outurl->sip_uri_scheme.sip_str_ptr = scan;
outurl->sip_uri_scheme.sip_str_len = uend - scan;
if (scan < uend && SIP_URI_ISALPHA(*scan)) {
++scan;
while (scan < uend && SIP_URI_ISSCHEME(*scan))
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_SCHEME;
return (1);
}
/*
* The format of params is supposed to be;XXX;XXX;XXX
* uri-parameters = *(";" uri-parameter)
* uri-parameter = transport-param / user-param / method-param
* / ttl-param / maddr-param / lr-param / other-param
* transport-param = "transport="
* ("udp" / "tcp" / "sctp" / "tls" / other-transport)
* other-transport = token
* user-param = "user=" ("phone" / "ip" / other-user)
* other-user = token
* method-param = "method=" Method
* ttl-param = "ttl=" ttl
* maddr-param = "maddr=" host
* lr-param = "lr"
* other-param = pname [ "=" pvalue ]
* pname = 1*paramchar
* pvalue = 1*paramchar
* paramchar = param-unreserved / unreserved / escaped
* param-unreserved = "[" / "]" / "/" / ":" / "&" / "+" / "$"
*/
static void
sip_uri_parse_params(_sip_uri_t *outurl, char *scan, char *uend)
{
char *mark = (char *)0;
char *equal = (char *)0;
int i = 0;
int ttl = 0;
int paramleftlen = 0;
int gothost = 0;
sip_param_t *param = NULL;
sip_param_t *new_param = NULL;
if (scan == uend || *scan != ';' || scan + 1 == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_PARAM;
return;
}
while (scan < uend) {
mark = ++scan;
while (scan < uend && *scan != ';')
++scan;
if (scan == mark) {
outurl->sip_uri_errflags |= SIP_URIERR_PARAM;
return;
}
new_param = calloc(1, sizeof (sip_param_t));
if (new_param == NULL) {
outurl->sip_uri_errflags |= SIP_URIERR_MEMORY;
return;
}
if (param == NULL)
outurl->sip_uri_params = new_param;
else
param->param_next = new_param;
param = new_param;
param->param_name.sip_str_ptr = mark;
equal = memchr(mark, '=', scan - mark);
if (equal == (char *)0) {
param->param_name.sip_str_len = scan - mark;
param->param_value.sip_str_ptr = NULL;
param->param_value.sip_str_len = 0;
while (mark < scan && (SIP_URI_ISPARAM(*mark) ||
SIP_URI_ISURLESCAPE(mark, scan))) {
++mark;
}
} else {
param->param_name.sip_str_len = equal - mark;
param->param_value.sip_str_ptr = equal + 1;
param->param_value.sip_str_len = scan - equal - 1;
if (mark == equal || equal + 1 == scan) {
outurl->sip_uri_errflags |= SIP_URIERR_PARAM;
return;
}
paramleftlen = equal - mark + 1;
if ((paramleftlen == 10 &&
!sip_uri_url_casecmp(mark, "transport=", 10)) ||
(paramleftlen == 5 &&
!sip_uri_url_casecmp(mark, "user=", 5)) ||
(paramleftlen == 7 &&
!sip_uri_url_casecmp(mark, "method=", 7))) {
if (scan - equal == 1) {
outurl->sip_uri_errflags |=
SIP_URIERR_PARAM;
return;
}
mark = equal + 1;
while (mark < scan && SIP_URI_ISTOKEN(*mark))
++mark;
} else if (paramleftlen == 4 &&
!sip_uri_url_casecmp(mark, "ttl=", 4)) {
if (scan - equal == 1) {
outurl->sip_uri_errflags |=
SIP_URIERR_PARAM;
return;
}
mark = equal;
for (i = 0; i < 3; ++i) {
++mark;
if (mark < scan &&
SIP_URI_ISDIGIT(*mark)) {
ttl = ttl * 10 + (*mark - '0');
}
if (ttl > 255) {
outurl->sip_uri_errflags |=
SIP_URIERR_PARAM;
return;
}
}
} else if (paramleftlen == 6 &&
!sip_uri_url_casecmp(mark, "maddr=", 6)) {
gothost = 0;
mark = equal + 1;
if (mark < scan && SIP_URI_ISDIGIT(*mark)) {
gothost = sip_uri_parse_ipv4(mark,
scan);
}
/*
* not valid syntax for a host or user name,
* try IPv6 literal
*/
if (!gothost && mark < scan && *mark == '[') {
gothost = sip_uri_parse_ipv6(mark,
scan);
}
/*
* look for a valid host name:
* *(domainlabel ".") toplabel ["."]
*/
if (!gothost && mark < scan) {
if (!(gothost =
sip_uri_parse_hostname(mark,
scan))) {
outurl->sip_uri_errflags |=
SIP_URIERR_PARAM;
}
}
if (gothost)
mark = scan;
} else if (paramleftlen == 3 &&
!sip_uri_url_casecmp(mark, "lr=", 3)) {
outurl->sip_uri_errflags |= SIP_URIERR_PARAM;
return;
} else {
while (mark < scan && (SIP_URI_ISPARAM(*mark) ||
SIP_URI_ISURLESCAPE(mark, scan) ||
mark == equal)) {
++mark;
}
}
}
if (mark < scan) {
outurl->sip_uri_errflags |= SIP_URIERR_PARAM;
return;
}
}
}
/*
* The format of headers is supposed to be ?XXX&XXX&XXX
* headers = "?" header *("&" header
* header = hname "=" hvalue
* hname = 1*(hnv-unreserved / unreserved / escaped
* hvalue = *(hnv-unreserved / unreserved / escaped
* hnv-unreserved = "[" / "]" / "/" / "?" / ":" / "+" / "$"
*/
static void
sip_uri_parse_headers(_sip_uri_t *outurl, char *scan, char *uend)
{
char *mark = NULL;
char *equal = NULL;
if (scan == uend || *scan != '?' || scan + 1 == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_HEADER;
return;
}
outurl->sip_uri_headers.sip_str_ptr = scan + 1;
outurl->sip_uri_headers.sip_str_len = uend - (scan + 1);
while (scan < uend) {
mark = ++scan;
while (scan < uend && *scan != '&')
++scan;
if (scan == mark) {
outurl->sip_uri_errflags |= SIP_URIERR_HEADER;
return;
}
equal = memchr(mark, '=', scan - mark);
if (equal == mark || equal == (char *)0) {
outurl->sip_uri_errflags |= SIP_URIERR_HEADER;
return;
}
while (mark < scan &&
(SIP_URI_ISHEADER(*mark) ||
SIP_URI_ISURLESCAPE(mark, scan) || mark == equal)) {
++mark;
}
if (mark < scan) {
outurl->sip_uri_errflags |= SIP_URIERR_HEADER;
return;
}
}
}
/*
* opaque-part = uric-no-slash *uric
* uric = reserved / unreserved / escaped
* uric-no-slash = unreserved / escaped / ";" / "?" / ":" / "@"
* / "&" / "=" / "+" / "$" / ","
*/
static void
sip_uri_parse_abs_opaque(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_OPAQUE;
return;
}
outurl->sip_uri_opaque.sip_str_ptr = scan;
outurl->sip_uri_opaque.sip_str_len = uend - scan;
if (SIP_URI_ISUNRESERVED(*scan) || SIP_URI_ISURLESCAPE(scan, uend) ||
SIP_URI_ISOTHER(*scan) || *scan == ';' || *scan == '?' ||
*scan == ':' || *scan == '@' || *scan == '&') {
++scan;
} else {
outurl->sip_uri_errflags |= SIP_URIERR_OPAQUE;
return;
}
while (scan < uend && (SIP_URI_ISRESERVED(*scan) ||
SIP_URI_ISUNRESERVED(*scan) || SIP_URI_ISURLESCAPE(scan, uend))) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_OPAQUE;
}
/*
* format of query is supposed to be ?XXX
* query = *uric
* uric = reserved / unreserved / escaped
*/
static void
sip_uri_parse_abs_query(_sip_uri_t *outurl, char *scan, char *uend)
{
if (uend == scan || *scan != '?' || scan + 1 == uend)
return;
++scan;
outurl->sip_uri_query.sip_str_ptr = scan;
outurl->sip_uri_query.sip_str_len = uend - scan;
while (scan < uend && (SIP_URI_ISRESERVED(*scan) ||
SIP_URI_ISUNRESERVED(*scan) || SIP_URI_ISURLESCAPE(scan, uend))) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_QUERY;
}
/*
* the format of path is supposed to be /XXX;XXX/XXX;
* abs-path = "/" path-segments
* path-segments = segment *( "/" segment )
* segment = *pchar *( ";" param )
* param = *pchar
* pchar = unreserved / escaped /
* ":" / "@" / "&" / "=" / "+" / "$" / ","
*/
static void
sip_uri_parse_abs_path(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend || *scan != '/')
return;
outurl->sip_uri_path.sip_str_ptr = scan;
outurl->sip_uri_path.sip_str_len = uend - scan;
++scan;
while (scan < uend && (SIP_URI_ISPCHAR(*scan) ||
SIP_URI_ISUNRESERVED(*scan) || SIP_URI_ISURLESCAPE(scan, uend) ||
*scan == '/' || *scan == ';')) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_PATH;
}
/*
* reg-name = 1*( unreserved / escaped / "$" / "," / ";"
* / ":" / "@" / "&" / "=" / "+" )
*/
static void
sip_uri_parse_abs_regname(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend)
return;
outurl->sip_uri_regname.sip_str_ptr = scan;
outurl->sip_uri_regname.sip_str_len = uend - scan;
while (scan < uend && (SIP_URI_ISUNRESERVED(*scan) ||
SIP_URI_ISURLESCAPE(scan, uend) || SIP_URI_ISREGNAME(*scan))) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_REGNAME;
}
/*
* The format of the password is supposed to be :XXX
* password = *( unreserved / escaped / "&" / "=" / "+" / "$" / "," )
*/
static void
sip_uri_parse_password(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend || *scan != ':' || scan + 1 == uend)
return;
++scan;
outurl->sip_uri_password.sip_str_ptr = scan;
outurl->sip_uri_password.sip_str_len = uend - scan;
while (scan < uend && (SIP_URI_ISUNRESERVED(*scan) ||
SIP_URI_ISURLESCAPE(scan, uend) || SIP_URI_ISOTHER(*scan) ||
*scan == '&')) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_PASS;
}
/*
* user = 1*( unreserved / escaped / user-unreserved )
* user-unreserved = "&" / "=" / "+" / "$" / "," / ";" / "?" / "/"
*/
static void
sip_uri_parse_user(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_USER;
return;
}
outurl->sip_uri_user.sip_str_ptr = scan;
outurl->sip_uri_user.sip_str_len = uend - scan;
if (sip_uri_parse_tel(scan, uend)) {
outurl->sip_uri_isteluser = B_TRUE;
} else {
while (scan < uend && (SIP_URI_ISUNRESERVED(*scan) ||
SIP_URI_ISURLESCAPE(scan, uend) || SIP_URI_ISUSER(*scan))) {
++scan;
}
if (scan < uend)
outurl->sip_uri_errflags |= SIP_URIERR_USER;
}
}
/*
* the format of port is supposed to be :XXX
* port = 1*DIGIT
*/
static void
sip_uri_parse_port(_sip_uri_t *outurl, char *scan, char *uend)
{
if (scan == uend || *scan != ':' || scan + 1 == uend) {
outurl->sip_uri_errflags |= SIP_URIERR_PORT;
return;
}
++scan;
/*
* parse numeric port number
*/
if (SIP_URI_ISDIGIT(*scan)) {
outurl->sip_uri_port = *scan - '0';
while (++scan < uend && SIP_URI_ISDIGIT(*scan)) {
outurl->sip_uri_port =
outurl->sip_uri_port * 10 + (*scan - '0');
if (outurl->sip_uri_port > 0xffff) {
outurl->sip_uri_errflags |= SIP_URIERR_PORT;
outurl->sip_uri_port = 0;
break;
}
}
}
if (scan < uend) {
outurl->sip_uri_errflags |= SIP_URIERR_PORT;
outurl->sip_uri_port = 0;
}
}
/*
* parse an IPv4 address
* 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT
* advances pscan to end of IPv4 address, or after last "." that was
* a valid IPv4 or domain name.
* returns 1 if ipv4 found, 0 otherwise
*/
static int
sip_uri_parse_ipv4(char *scan, char *uend)
{
int j = 0;
int val = 0;
for (j = 0; j < 4; ++j) {
if (!SIP_URI_ISDIGIT(*scan))
break;
val = *scan - '0';
while (++scan < uend && SIP_URI_ISDIGIT(*scan)) {
val = val * 10 + (*scan - '0');
if (val > 255)
return (0);
}
if (j < 3) {
if (*scan != '.')
break;
++scan;
}
}
if (j == 4 && scan == uend)
return (1);
return (0);
}
/*
* parse an IPv6 address
* IPv6address = hexpart [ ":" IPv4address ]
* IPv4address = 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT "." 1*3DIGIT
* hexpart = hexseq | hexseq "::" [ hexseq ] | "::" [ hexseq ]
* hexseq = hex4 *( ":" hex4)
* hex4 = 1*4HEXDIG
* if not found, leaves pscan unchanged, otherwise advances to end
* returns 1 if valid,
* 0 if invalid
*/
static int
sip_uri_parse_ipv6(char *scan, char *uend)
{
char *mark;
unsigned j = 0; /* index for addr */
unsigned val = 0; /* hex value */
int zpad = 0; /* index of :: delimiter */
if (*scan != '[')
return (0);
++scan;
j = 0;
/*
* check for leading "::", set zpad to the position of the "::"
*/
if (scan + 1 < uend && scan[0] == ':' && scan[1] == ':') {
zpad = 0;
scan += 2;
} else {
zpad = -1;
}
/*
* loop through up to 16 bytes of IPv6 address
*/
while (scan < uend && j < 15) {
if (!SIP_URI_ISHEX(*scan))
break;
mark = scan;
val = SIP_URI_HEXVAL(*scan);
while (++scan < uend && SIP_URI_ISHEX(*scan)) {
val = val * 16 + SIP_URI_HEXVAL(*scan);
if (val > 0xffff)
return (0);
}
/*
* always require a delimiter or ]
*/
if (scan == uend)
return (0);
if (*scan == '.' && (j == 12 || (zpad != -1 && j < 12)) &&
mark < uend && sip_uri_parse_ipv4(mark, uend - 1) &&
*(uend - 1) == ']') {
mark = uend - 1;
j += 4;
scan = mark + 1;
break;
}
/*
* set address
*/
j += 2;
/*
* check for delimiter or ]
*/
if (*scan == ':') {
/*
* found ":" delimiter, check for "::"
*/
if (++scan < uend && *scan == ':') {
if (zpad != -1)
return (0);
zpad = j;
if (++scan < uend && *scan == ']') {
++scan;
break;
}
}
} else if (*scan == ']' && (j == 16 || zpad != -1)) {
++scan;
break;
} else {
/*
* not a valid delimiter
*/
return (0);
}
}
if (zpad == -1 && j < 16)
return (0);
if (zpad != -1) {
if (j > 15)
return (0);
}
if (scan == uend)
return (1);
return (0);
}
/*
* hostname = *( domainlabel "." ) toplabel [ "." ]
* domainlabel = alphanum / alphanum *( alphanum / "-" ) alphanum
* toplabel = ALPHA / ALPHA *( alphanum / "-" ) alphanum
*/
static int
sip_uri_parse_hostname(char *scan, char *uend)
{
int sawalpha = 0;
if (scan < uend && SIP_URI_ISALNUM(*scan)) {
do {
sawalpha = SIP_URI_ISALPHA(*scan);
while (SIP_URI_ISHOST(*scan))
++scan;
if (*scan != '.')
break;
++scan;
} while (scan < uend && SIP_URI_ISALNUM(*scan));
}
if (sawalpha && scan == uend)
return (1);
return (0);
}
/*
* parse the network path portion of a full URL
*/
static void
sip_uri_parse_netpath(_sip_uri_t *outurl, char **pscan, char *uend,
boolean_t issip)
{
char *mark = (char *)0;
char *mark2 = (char *)0;
char *scan = *pscan;
int gothost = 0;
/*
* look for the first high-level delimiter
*/
mark = scan;
while (scan < uend && *scan != '@')
++scan;
/*
* handle userinfo section of URL
*/
if (scan < uend && *scan == '@') {
/*
* parse user
*/
mark2 = mark;
while (mark < scan && *mark != ':')
++mark;
sip_uri_parse_user(outurl, mark2, mark);
/*
* parse password
*/
if (*mark == ':')
sip_uri_parse_password(outurl, mark, scan);
mark = ++scan;
}
scan = mark;
if (scan < uend && *scan == '[') { /* look for an IPv6 address */
while (scan < uend && *scan != ']')
++scan;
if (scan < uend) {
++scan;
if (sip_uri_parse_ipv6(mark, scan))
gothost = 1;
}
} else {
while (scan < uend && ((issip && !SIP_URI_ISSIPHDELIM(*scan)) ||
(!issip && !SIP_URI_ISABSHDELIM(*scan)))) {
++scan;
}
/*
* look for an IPv4 address
*/
if (mark < scan && SIP_URI_ISDIGIT(*mark) &&
sip_uri_parse_ipv4(mark, scan)) {
gothost = 1;
}
/*
* look for a valid host name
*/
if (!gothost && mark < scan &&
sip_uri_parse_hostname(mark, scan)) {
gothost = 1;
}
}
/*
* handle invalid host name
*/
if (!gothost)
outurl->sip_uri_errflags |= SIP_URIERR_HOST;
/*
* save host name
*/
outurl->sip_uri_host.sip_str_ptr = mark;
outurl->sip_uri_host.sip_str_len = scan - mark;
mark = scan;
/*
* parse the port number
*/
if (scan < uend && *scan == ':') {
while (scan < uend && ((issip && !SIP_URI_ISSIPDELIM(*scan)) ||
(!issip && !SIP_URI_ISABSDELIM(*scan)))) {
++scan;
}
sip_uri_parse_port(outurl, mark, scan);
}
/*
* set return pointer
*/
*pscan = scan;
}
/*
* parse a URL
* URL = SIP-URI / SIPS-URI / absoluteURI
*/
void
sip_uri_parse_it(_sip_uri_t *outurl, sip_str_t *uri_str)
{
char *mark;
char *scan;
char *uend;
char *str = uri_str->sip_str_ptr;
unsigned urlen = uri_str->sip_str_len;
/*
* reset output parameters
*/
(void) memset(outurl, 0, sizeof (sip_uri_t));
/*
* strip enclosing angle brackets
*/
if (urlen > 1 && str[0] == '<' && str[urlen-1] == '>') {
urlen -= 2;
++str;
}
uend = str + urlen;
/*
* strip off space prefix and trailing spaces
*/
while (str < uend && isspace(*str)) {
++str;
--urlen;
}
while (str < uend && isspace(*(uend - 1))) {
--uend;
--urlen;
}
/*
* strip off "URL:" prefix
*/
if (urlen > 4 && sip_uri_url_casecmp(str, "URL:", 4) == 0) {
str += 4;
urlen -= 4;
}
/*
* parse the scheme name
*/
mark = scan = str;
while (scan < uend && *scan != ':')
++scan;
if (scan == uend || !sip_uri_parse_scheme(outurl, mark, scan)) {
outurl->sip_uri_errflags |= SIP_URIERR_SCHEME;
return;
}
if ((outurl->sip_uri_scheme.sip_str_len == SIP_SCHEME_LEN &&
!memcmp(outurl->sip_uri_scheme.sip_str_ptr, SIP_SCHEME,
SIP_SCHEME_LEN)) ||
(outurl->sip_uri_scheme.sip_str_len == SIPS_SCHEME_LEN &&
!memcmp(outurl->sip_uri_scheme.sip_str_ptr, SIPS_SCHEME,
SIPS_SCHEME_LEN))) {
outurl->sip_uri_issip = B_TRUE;
} else {
outurl->sip_uri_issip = B_FALSE;
}
++scan; /* skip ':' */
if (outurl->sip_uri_issip) {
/*
* parse SIP URL
*/
sip_uri_parse_netpath(outurl, &scan, uend, B_TRUE);
/*
* parse parameters
*/
if (scan < uend && *scan == ';') {
mark = scan;
while (scan < uend && *scan != '?')
++scan;
sip_uri_parse_params(outurl, mark, scan);
}
/*
* parse headers
*/
if (scan < uend && *scan == '?')
sip_uri_parse_headers(outurl, scan, uend);
} else if (scan < uend && scan[0] == '/') { /* parse absoluteURL */
++scan;
/*
* parse authority
* authority = srvr / reg-name
* srvr = [ [ userinfo "@" ] hostport ]
* reg-name = 1*(unreserved / escaped / "$" / ","
* / ";" / ":" / "@" / "&" / "=" / "+")
*/
if (scan < uend && *scan == '/') {
++scan;
mark = scan;
/*
* take authority as srvr
*/
sip_uri_parse_netpath(outurl, &scan, uend, B_FALSE);
/*
* if srvr failed, take it as reg-name
* parse reg-name
*/
if (outurl->sip_uri_errflags & SIP_URIERR_USER ||
outurl->sip_uri_errflags & SIP_URIERR_PASS ||
outurl->sip_uri_errflags & SIP_URIERR_HOST ||
outurl->sip_uri_errflags & SIP_URIERR_PORT) {
scan = mark;
while (scan < uend && *scan != '/' &&
*scan != '?') {
++scan;
}
sip_uri_parse_abs_regname(outurl, mark, scan);
if (!(outurl->sip_uri_errflags &
SIP_URIERR_REGNAME)) {
/*
* remove error info of user,
* password, host, port
*/
outurl->sip_uri_user.sip_str_ptr = NULL;
outurl->sip_uri_user.sip_str_len = 0;
outurl->sip_uri_errflags &=
~SIP_URIERR_USER;
outurl->sip_uri_password.sip_str_ptr =
NULL;
outurl->sip_uri_password.sip_str_len =
0;
outurl->sip_uri_errflags &=
~SIP_URIERR_PASS;
outurl->sip_uri_host.sip_str_ptr = NULL;
outurl->sip_uri_host.sip_str_len = 0;
outurl->sip_uri_errflags &=
~SIP_URIERR_HOST;
outurl->sip_uri_port = 0;
outurl->sip_uri_errflags &=
~SIP_URIERR_PORT;
}
}
} else {
/*
* there is no net-path
*/
--scan;
}
/*
* parse abs-path
*/
if (scan < uend && *scan == '/') {
mark = scan;
while (scan < uend && *scan != '?')
++scan;
sip_uri_parse_abs_path(outurl, mark, scan);
}
/*
* parse query
*/
if (scan < uend && *scan == '?')
sip_uri_parse_abs_query(outurl, scan, uend);
} else {
/*
* parse opaque-part
*/
sip_uri_parse_abs_opaque(outurl, scan, uend);
}
}